23.04.2010, 17:27
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
С нами:
8582863
Репутация:
69
|
|
a ваще я предложу так:
Код:
type TmyThread = class(TThread)
procedure Execurte; override;
end;
....
procedure TMyThread.Execute;
begin
// Код функции
end;
в принципе это самы стандартный пример)))) Вызываеца так:
Код:
var MyThread : TMyThread;
begin
MyThread := TMyThread.Create(False);
end;
кароче думаю вы понели о чем речь)))) |
|
|