Bruno escribió:
Jesús,
trueSoft escribió:
He estado mirando la actualización y me he puesto a probar la estructura With/EndWith, que comentastes que la ibas a implementar y FUNCIONA 100x100. Es muy buena. Solo dos aclaraciones:
1ª Como no la has documentado, ¿está lista para utilizar?
Veo que no me puedo callar nada, lo investigáis todo
![Smile :-)](./images/smilies/icon_smile.gif)
La puedes usar sin problemas, está terminada lo que no he hecho y por eso no lo he anunciado todavía es que el IDE se aproveche de ella para generar el código de los formularios, pero vendrá muy bien que la vayas probando.
trueSoft escribió:
2ª ¿Es un comando 'al uso' o es compilado y mejora el rendimiento de C3?
No es un comando, ni es preprocesado, es compilado, genera código optimizado y se tiene que notar bastante.
Hola, de nuevo.
Siguiendo con el tema...
Se me ocurre la siguiente situación:
With ::FGroupBoxDate := TAppGroupBox():Create( Self )
:Caption := "Fecha"
:SetBounds( 6, 55, 99, 43 )
EndWith
With ::FDatePickerFecha := TDBDateTimePicker():Create( ::FGroupBoxDate )
:Alias := oApp:PacIng:Doc:Alias
![Very Happy :D](./images/smilies/icon_biggrin.gif)
ataSource := "PacDoc"
:Field := "PacDocFch"
:SetBounds( 6, 17, 87, 21 )
EndWith
Se me ocurre que podria optimizarlo eliminando la data ::FGroupBoxDate, y trato de hacer lo siguiente (pero no lo consigo).
With TAppGroupBox():Create( Self )
:Caption := "Fecha"
:SetBounds( 6, 55, 99, 43 )
With ::FDatePickerFecha := TDBDateTimePicker():Create( <referencia al data GroupBox - ¿como? )
:Alias := oApp:PacIng:Doc:Alias
![Very Happy :D](./images/smilies/icon_biggrin.gif)
ataSource := "PacDoc"
:Field := "PacDocFch"
:SetBounds( 6, 17, 87, 21 )
EndWith
EndWith
¿Me he explicado...?