FiveTech Support Forums

saludos amigos, tengo el siguiente combo box

@ 12, 280 SAY OSAY VAR "Documento" OF oDLG PIXEL FONT FONT1 SIZE 50,12
@ 10, 325 COMBOBOX aoObjetos[4] VAR TQUE ITEMS {"FACTURA","NOTA","CXC"} OF oDLG size 60,45 PIXEL FONT FONT1 ON CHANGE      (oDlg:aEvalWhen(),aoObjetos:=DATO1(ODLG,aoObjetos,aoSay))

bien hasta aqui todo bien, al cambiar el combo, llamo a una funcion enviando la seleccion correspondiente, en esta funcion lo que hago es colocar en el mismo dialogo una serie de get para cada caso en particular asi:

FUNCTION DATO1(ODLG,aoObjetos)
local factor:=2

// aca destruyo los objetos, esto me los borra del dialogo, como si hiciera un hide del objetos
if aoObjetos[5]<>NIL
aoObjetos[5]:end()
endif
if aoObjetos[6]<>NIL
aoObjetos[6]:end()
endif
if aoObjetos[7]<>NIL
aoObjetos[7]:end()
endif
if aoObjetos[8]<>NIL
aoObjetos[8]:end()
endif

if aoSay[1]<>NIL
aoSay[1]:end()
endif
if aoSay[2]<>NIL
aoSay[2]:end()
endif
if aoSay[3]<>NIL
aoSay[3]:end()
endif
if aoSay[4]<>NIL
aoSay[4]:end()
endif
SET 3DLOOK On //no funciona
// vuelvo a crear los say y get segun seleccion

IF aoObjetos[4]:nAt=1
@ 33factor, 080factor SAY aoSay[1] VAR "# CONTROL:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 31factor, 125factor GET aoObjetos[5] VAR TNUMCON OF oDlg PIXEL FONT FONT1 PICTURE "99999999" SIZE 60FACTOR,12FACTOR
@ 48factor, 007factor SAY aoSay[3] VAR "CLIENTE:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 46factor, 052factor COMBOBOX aoObjetos[7] VAR Tfactu ITEMS factu OF ODLG size 150FACTOR,200FACTOR PIXEL FONT FONT1
IF aoObjetos[4]:nAt=2
@ 48factor, 007factor SAY aoSay[3] VAR "CUENTA NOTAS:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 46factor, 055factor COMBOBOX aoObjetos[5] VAR Tnotas ITEMS nota OF oDlg SIZE 50FACTOR,70FACTOR PIXEL FONT FONT1
@ 48factor, 117factor SAY aoSay[4] VAR "# N:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 46factor, 137factor GET aoObjetos[6] VAR TN OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR

ENDIF
IF aoObjetos[4]:nAt=3
@ 48factor, 007factor SAY aoSay[3] VAR "CUENTA CXC:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 46factor, 052factor COMBOBOX aoObjetos[5] VAR tcxc ITEMS cxc OF oDlg SIZE 50FACTOR,70FACTOR PIXEL FONT FONT1
@ 48factor, 107factor SAY aoSay[4] VAR "HASTA:" OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR
@ 46factor, 147factor GET aoObjetos[6] VAR TNUMZ OF oDlg PIXEL FONT FONT1 SIZE 60FACTOR,12FACTOR

ENDIF
RETURN NIL

bien ahora los problemas sin solucion son:
1.- salen sin 3d, los get planos y los combos invisibles hasta que les de click, al perder el foco solo se les ve la flecha para agrandarlos

y un segundo problema,
2.- todo lo hace excepto que dibuja los controles como si los dibujara en una windows y no en un dialog, razon por lo cual tengo que duplicar el tamaño, al ponerle por 2 a todo salen igual, la pregunta es porque si es un dialogo no lo reconoce como tal

lo que no quiero precisamente es abrir otro dialogo a pregunta 2 cositas, etc

gracias
ideas?

muy dificil?

QAZWSX2K, ¿porqué no preparas un ejemplo autocontenido que nos muestre el fenómeno?. Lo subes con su código y lo que sea necesario para poderlo compilar y ver si podemos ayudarte.
Saludos