Ver Mensaje Individual
  #7  
Antiguo 10-04-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 22
cHackAll Va por buen camino
Código Delphi [-]
function Thread(hWnd: Cardinal): Cardinal; stdcall;
begin
 CopyFile('C:\Ejemplo_fuente.exe', 'C:\Ejemplo_destino.exe', False);
 SendMessage(hWnd, WM_USER, 0, 0);
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
 CreateThread(nil, 0, @Thread, Pointer(Handle), 0, PDWORD(0)^);
end;

Tu aplicación recivirá el mensaje WM_USER cuando la copia finalice (ejemplo).

Quien dá mas??

Saludos
Responder Con Cita