[Shaitanking163Rus]

в проекте нужно создать несколько поток, которые пишут своё состояние в компонент мемо и периодичность работы потока должно корректироваться, как это можно реализовать?

[NumLock]

Без проблем! Даже в справке пример есть.

[Shaitanking163Rus]

в какой справке и где можно посмотреть пример?

[lmikle]

Что понимается под "периодичность работы потока должно корректироваться"?

По поводу состояния в Memo, то просто из потока вызываешь что-то типа:

Код:

type
  TMyThread = class(TThread)
  private
    FMyStatua : String;
    ...
    procedure WriteStatus;
    ...
  end;

...

procedure TMyThread.WriteStatus;
begin
  Form1.Memo1.Lines.Add('Thread status - ' + FMyStatus);
end;

procedure TMyThread.Execute;
begin
  While Not Terminated Do
  begin
    ...
    FMyStatus := 'Running';
    Symchronize(WriteStatus);
    ...
  end;
  FMyStatus := 'Exiting';
  Symchronize(WriteStatus);
end;

[NumLock]

Сообщение от Shaitanking163Rus

в какой справке и где можно посмотреть пример?

В Delphi Help:



и c:\Program Files (x86)\Borland\Delphi7\Demos\Threads