FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
nuevo en delphi
hola soy nuevo en delphi y queria hacer una consulta:
quiero ejecutar un procedimiento (para el caso puede ser un sleep(50) ) DESPUES de que se muestre la ventana principal de la aplicacion. los ejemplos que vi realizan la accion dentro de FormCreate, pero asi primero hace el sleep y despues muestra la ventana. lo que yo necesito es que se muestre la ventana por un lado y que se ejecute mi procedimiento por el otro, este procedimiento actualiza textos y progressbar dentro de la unica ventana principal. alguno podria ayudarme con esto? gracias |
#2
|
||||
|
||||
Podrías intentar usar el evento OnShow aunque no siempre da los resultados esperados ya que si tu procedimiento toma tiempo, por ejemplo cargar una tabla de una base de datos, entonces el formulario se muestra pero algunos controles, principalmente las etiquetas, no aparecen sino hasta que termina el procedimiento.
Lo que yo hago en ocasiones es mandar un mensaje personalizado para que se ejecute después del OnShow: Código:
const CM_AFTERSHOW = WM_USER + 1; type TForm1 = class(TForm) procedure FormShow(Sender: TObject); private procedure CMAfterShow(var Msg: TMessage); message CM_AFTERSHOW; end; implementation procedure TForm1.FormShow(Sender: TObject); begin PostMessage(CM_AFTERSHOW); end; procedure TForm1.CMAfterShow(var Msg: TMessage); begin { Aquí tu procedimiento } end; // Saludos |
#3
|
|||
|
|||
Mil Gracias, es justo lo que necesitaba
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|