Boa Tarde Pessoal,
Gostaria de uma ajuda de vocês, eu desenvolvendo uma aplicação que quando
é iniciada eu chamo uma thread e gostaria de finalizar a aplicação
quando a thread for finalizada.
Abaixo o codigo da minha thread:
Qdo eu crio a thread:
constructor TCopArquivos.Carregar(_LstDiretorios: TStringList;
_ArqCount: Integer);
begin
inherited
Create(True);
FreeOnTerminate := True;
LstDiretorios := _LstDiretorios;
ArqCount := _ArqCount;
Priority := TpLower;
Resume;
end;
Na propriedade eu coloquei:
procedure TCopArquivos.SetOnTerminate(const Value: TNotifyEvent);
begin
FOnTerminate := Value;
Application.Terminate;
end;
Eu chamo a minha thread da seguinte forma, no evento onshow do meu form
principal:
TCopArquivos.Carregar(LstDirAtualiza,F_ArqCount);
Só que minha aplicação não está encerrando qdo a thread finaliza.
Tenho duas questões... ou minha thread nao está finalizando depois que
termina o execute... ou realmente desta forma não funciona.
Agradeço a ajuda de todos.
Att.
Wilian Domingues
Analista de Sistemas
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
http://br.mail.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
