Clipper/FiveWin - Del Dbedit() al tbrowse

 
Vista:

Del Dbedit() al tbrowse

Publicado por Javier Diaz (19 intervenciones) el 17/01/2007 07:43:33
Hola!!, Soy antiguo programador en clipper, este software fué mi fiel compañero por muchos años. Estoy recién empezando con Fivewin y tengo muchos problemas en entender la sintaxis del tbrowse. Tendrán por favor algun pequeño ejemplo de lo que en clipper era un dbedit() pero ahora en fivewin? Muchas Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Del Dbedit() al tbrowse

Publicado por JOSE (79 intervenciones) el 17/01/2007 14:03:32
En Clipper:
eclare campo1[2], TitArt[2], PictArt[2]
campo1[1] = "MA_TIPO->MA_TIPO"
campo1[2] = "MA_TIPO->MA_DESC"
TitArt[1] = "[F2]Cod."
TitArt[2] = "* [F3]Detalle *"
PictArt[1] ="XX"
PictArt[2] ="XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
noc = ""
col = 47
keyboard chr(166)
Set Color To (color_01)
@ 10,35 to 20,77
@ 12,35 Say "Ã"+SPACE(41)+"´"
Dbedit(11,36,20,76,campo1,"Controla",PictArt,TitArt,.T.,.T.,"ÄÁÄ")

En Fivewin:
@ 0, 0 LISTBOX oLbx ;
FIELDS (cMa_Tipo)->Ma_Tipoi,(cMa_Tipo)->Ma_Desc);
HEADER "Codigo","Descripcion";
SIZES 100,400;
OF oWChld ALIAS (cExi_Suc)->(Alias()) UPDATE FONT oVentPrinc:oFont;
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Del Dbedit() al tbrowse

Publicado por Gabriel Pascual (914 intervenciones) el 17/01/2007 17:36:56
Mirate los ejemplos TESTBRW*.PRG que estan en la carpeta SAMPLES en la instalacion de FiveWin.

Tambien en la carpeta SOURCE\FUNCTION viene el codigo fuente de la funcion BROWSE de FiveWin que te puede ayudar a entender mejor como funciona el objeto.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar