Запуск Потока Из Таймера, Как?

Тема в разделе "Delphi - FAQ", создана пользователем buket, 15 дек 2011.

Статус темы:
Закрыта.
  1. buket

    buket Гость

    не получается запустить потоки из таймера, при создании потока из кнопки все работает
    Код (Text):
    procedure TForm1.Button2Click(Sender: TObject);
    begin
    MyThread:=TMyThread.Create(False);
    MyThread.Priority:=tpNormal;
    MyThread.FreeOnTerminate:=true;
    end;
    при запуске из таймера не запускается(таймер включен на 15 секунд)
    Код (Text):
    procedure TForm1.Timer2Timer(Sender: TObject);
    begin
    MyThread:=TMyThread.Create(False);
    MyThread.Priority:=tpNormal;
    MyThread.FreeOnTerminate:=true;
    end;
     
  2. sinkopa

    sinkopa Well-Known Member

    Регистрация:
    17 июн 2009
    Сообщения:
    344
    Симпатии:
    9
    Не может такого быть... Только что проверил у себя. Прекрасно запускается, отрабатывает и умирает...
    Ищите проблему "внутри" метода Execute. Подозреваю, что Вы пытаетесь там "работать" с визуальными контролами формы созданной в основном потоке.
    Это можно делать только через Synchronize (почитайте в хелпе)
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей