![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Для своей программы хочу использовать потоки. Т.к. работаю с визуальными компонентами, то приходиться использовать метод Synchronize. Программа работает нормально, НО Delphi, почемуто подчеркивает Synchronize красным и пишет
Цитата:
Вопросы: 1. С чем это может быть связано? 2. Как это исправить? 3. Почему заведомо описанный метод отмечается как не описанный? ![]() Последний раз редактировалось ProperDoze, 11.09.2008 в 21:22. |
|
#2
|
|||
|
|||
|
Как запустить поток повторно?
![]() |
|
#3
|
|||
|
|||
|
Если он закончился, то только повторно его создав.
|
|
#4
|
|||
|
|||
|
Цитата:
А как быть с Synchronize? Мне кажется, что мой поток не работает, как нужно. Потому, что без Application.ProcessMessages Форму не прорисовывает. Что делать? |
|
#5
|
|||
|
|||
|
Как я могу тебе сказать, что ты делаешь не так, если я не вижу что и как ты делаешь? Код приведи, бум смотреть.
|
|
#6
|
|||
|
|||
|
Цитата:
Ок. Код:
unit Thread_Chart_repaint;
interface
uses
Classes;
type
Repaint_Charts = class(TThread)
private
{ Private declarations }
protected
procedure Execute; override;
public
Processing: boolean;
end;
implementation
uses converter;
{ Important: Methods and properties of objects in visual components can only be
used in a method called using Synchronize, for example,
Synchronize(UpdateCaption);
and UpdateCaption could look like,
procedure Repaint_Charts.UpdateCaption;
begin
Form1.Caption := 'Updated in a thread';
end; }
{ Repaint_Charts }
procedure Repaint_Charts.Execute;
begin
//while not Terminated do
//while Processing do
Synchronize(Charts_panel.Paint_charts);
end;
end.Synchronize подчеркнуто красным, но код исполняется. |