Hola, alguien se SOPORTE? o que le haya pasado?
Asi esta el codigo....
WITH OBJECT ::oArrayBrowse1 := TArrayBrowse():New( Self )
:SetBounds( 8, 48, 738, 226 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Serif", 12, 0, 400 )
:nClrText := clBlack
WITH OBJECT TArrayBrwColumn():New( ::oArrayBrowse1 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Serif", 10, 0, 400 )
:cHeader := "Forma de Pago"
:nClrText := clBlack
:nAlignment := taLEFTHEADERCENTER
:nWidth := 209
:nEditType := beLISTBOX
:uDefaultValue := " "
:OnPostEdit := "ArrayBrowse1Column1PostEdit"
:OnGetValue := "ArrayBrowse1Column1GetValue"
:Create()
END
WITH OBJECT TArrayBrwColumn():New( ::oArrayBrowse1 )
:lParentFont := .F.
:oFont := TFont():Create( "MS Sans Serif", 10, 0, 400 )
:cHeader := "Banco"
:nClrText := clBlack
:nAlignment := taLEFTHEADERCENTER
:nWidth := 97
:nEditType := beLISTBOX
:uDefaultValue := " "
:OnPostEdit := "ArrayBrowse1Column5PostEdit"
:OnGetValue := "ArrayBrowse1Column2GetValue"
:Create()
END
Ramón Zea
Móvil.: 993-231.62.29
Tel./Fax: 993-353-46-73
zeasoftware@hotmail.com
escribió en el mensaje de noticias:[email=4ea0fa56@svctag-j7w3v3j....]4ea0fa56@svctag-j7w3v3j....[/email]
Tengo un detalle:
Tengo un TArrayBrowse, en la columna 1 defino que sea la captura beLISTBOX,
igual en la segunda, pero esta ultima se comporta como beGETLISTBOX, por
que?
Ya revise mi código y todo esta (aparentemente) bien....
Saludos.
Ramón Zea
Móvil.: 993-231.62.29
Tel./Fax: 993-353-46-73
zeasoftware@hotmail.com
--