VPF::Уничтожить форму из потока - Форум программистов

malor

Дата 21.10.2012, 16:24 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 632
Регистрация: 17.11.2006

Репутация: нет
Всего: нет

Пусть есть функция, в которой мы создаем поток и вслед за этим открываем какую-то форму:

Код

  InfoExist := false;

  with TMyThread.Create(False) do
  begin
    pFI := @FormInfo;
    FreeOnTerminate := True;
    Resume;
  end;

  FormInfo.ShowModal();

  if InfoExist then
    Result := true;

Что в функциях потока:

Код

procedure TMyThread.CloseFormInfo();
begin

  pFI.Close;

end;

procedure TMyThread.Execute;
begin
  inherited;

  sleep(5000);
  GetInfo();
  Synchronize(CloseFormInfo);

end;

Как правильно уничтожить форму FormInfo ?

rodnover

Дата 21.10.2012, 16:36 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 223
Регистрация: 7.4.2009

Репутация: 1
Всего: 10

А где форма создается?

MetalFan

Дата 21.10.2012, 21:47 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128

Цитата(malor @ 21.10.2012, 16:24

)

Что в функциях потока:

Фигня в функции потока. и зачем вообще нужен поток? закрывай форму по таймеру, к примеру.

--------------------

There are always someone smarter than you...

Frees

Дата 23.10.2012, 09:12 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 16
Всего: 54

Цитата(malor @ 21.10.2012, 19:24

)

Как правильно уничтожить форму FormInfo ?

Передайему сообщение из потока WM_CLOSE можно без синхронизации

Это сообщение отредактировал(а) Frees - 23.10.2012, 09:14

--------------------

Кольцов Виктор Владимирович

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »