Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.15;
Скачать: CL | DM;

Вниз

TThread   Найти похожие ветки 

 
Are you want a tea?   (2002-08-04 16:06) [0]

Моя программа при нажатии кнопки копирует файл с помощью CopyFile. Но при этом программа замораживается, пока не будет закончено копирование. Это не есть хорошо. И я создаю поток:
TCopyThread=class(TThread)
private
fOldFile,fNewFile:String;
public
constructor Create(OldFile,NewFile:String);
procedure Execute; override;
end;

constructor TCopyThread.Create(OldFile, NewFile: String);
begin
fOldFile:=OldFile;
fNewFile:=NewFile;
inherited Create(true);
end;

procedure TCopyThread.Execute;
begin
CopyFile(PChar(fOldFile),PChar(fNewFile),false);
end;

procedure TForm1.btnCopyClick(Sender: TObject);
begin
with TCopyThread.Create(edtOldFile.Text,edtNewFile.Text) do
Execute
end;

При этом программа всё равно замораживается. Но если inherited Create(true) заменить на inherited Create(false) а в btnCopyClick написать TCopyThread.Create(edtOldFile.Text,edtNewFile.Text), то всё работает как надо. Почему так происходит?


 
DiamondShark ©   (2002-08-04 16:18) [1]

Execute не надо вызывать


 
TTCustomDelphiMaster ©   (2002-08-04 16:45) [2]

Are you want a tea? (04.08.02 16:06)
with TCopyThread.Create(edtOldFile.Text,edtNewFile.Text) do
Execute // Заменить на Resume

Ошибка в том что вы вызываете метод Execute не через новый поток, а в главном потоке (как обычный метод).


 
Are you want a tea?   (2002-08-04 20:45) [3]


> TTCustomDelphiMaster © (04.08.02 16:45)

Спасибо, понял.



Страницы: 1 вся ветка

Текущий архив: 2002.08.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
6-48242
Ampersand
2002-05-31 07:42
2002.08.15
Запретить работу по TCP/IP


1-48118
Jusic
2002-08-05 16:20
2002.08.15
Как можно узнать, открыто ли мое приложение уже или это первая ег


7-48323
ol
2002-05-31 10:17
2002.08.15
как посчитать контрольную суму посылки в ком порт


3-47956
NDR
2002-07-25 14:25
2002.08.15
Как в DBGRID-е закрепить шапку ?


3-47924
Rustik
2002-07-25 10:33
2002.08.15
Мастера подскажите где можно посмотреть как создать адресный