Cita:
|
Empezado por seoane
Código Delphi [-]const WM_TRABAJAR = WM_USER + 100; ... procedure TForm1.FormCreate(Sender: TObject); begin // Aqui inicializa tu aplicacion // Posteamos el mensaje PostMessage(Handle,WM_TRABAJAR,0,0); end; procedure TForm1.WMTRABAJAR(var Msg: TMessage); var i: integer; begin for i:= 1 to 3 do begin Memo1.Lines.Add('Hola'); Application.ProcessMessages; Sleep(1000); end; end; |
Hola Seoane por favor si pudieras aclarme un poco esto de los mensajes en un aplicacion.
Que ventajas tiene usarlo?
O sea me refiero a:
Application.ProcessMessages;
TMessage
Saludos y desde ya muchas gracias