Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как запутить поток?

Автор: TheAviator 16.3.2004, 21:06

Ну типа создал поток, например, так вот:

Цитата

unit uThread;
interface
uses
Classes;
type
TMyThread = class(TThread)
private
{ Private declarations }
protected
procedure Execute; override;
end;
implementation
{ TMyThread }
uses uForm1;
procedure TMyThread.Execute;
begin
Form1.Label1.Caption:='Hello';
end;
end.

А к как его запутить...
Просто MyThread.Execute не пашет чето...

Автор: <Spawn> 16.3.2004, 21:14

Из главной формы:

Код

var
  MyThread: TMyThread;
begin
  MyThread := TMyThread.Create(True);
  MyThread.FreeOnTerminate := True;
  MyThread.Resume;