|
#1
|
|||
|
|||
многопоточность
в проекте нужно создать несколько поток, которые пишут своё состояние в компонент мемо и периодичность работы потока должно корректироваться, как это можно реализовать?
|
#2
|
||||
|
||||
Без проблем! Даже в справке пример есть.
Пишу программы за еду. __________________ |
#3
|
|||
|
|||
в какой справке и где можно посмотреть пример?
|
#4
|
|||
|
|||
Что понимается под "периодичность работы потока должно корректироваться"?
По поводу состояния в 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; |
#5
|
||||
|
||||
Цитата:
и c:\Program Files (x86)\Borland\Delphi7\Demos\Threads Пишу программы за еду. __________________ |