Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.12.2010, 20:14   #1
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,426
По умолчанию при закрытии потока(Tthread) посылать на форму код ответа или сообщение

Всем привет!

Проблема:
Если запускать чужую программу из моей то, в TListView будет показан статус(Работает). И если также закрыть.

Но вот ситуация:
в программе предусмотрена опция "Закрыть в указнное время" закрытие призводит сам поток. И в этом случае если поток был запущен нажатием кнопки в моей программе. То как отобразить в моей программе что поток завершил работу?
Проще говоря передать сообщение на форму о том чт о сделал поток и в каком статусе программа(Закрыта или нет).

А то получается что поток закрыл запущенную программу в указанное время, а в моей программе показано что поток(программа) продолжает работать.

Поток - tthread.

Как решить эту задачку?

p.S. Где-то слышал о ReturnValue - свойство потока. Но как его использовать?
Человек_Борща вне форума Ответить с цитированием
Старый 14.12.2010, 20:16   #2
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

а еще у потока есть событие OnTerminate

таймером делаешь такое?
а ведь может не справедливо выйти в случае нагрузки(хотя я про jobs говорил, ну да ладно, твое дело)
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 14.12.2010, 21:19   #3
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,426
По умолчанию

Хм т.е. смотреть OnTerminate и там проверять значение ReturnValue? Типа
Код:
Case Thread.ReturnValue of
...
Таймер, с ним много возиться надо.
wait_TIMEOUT вылавливаю=)
Человек_Борща вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
MessageBox или как возвратить назад форму при отмене? Deface87 Общие вопросы Delphi 4 18.05.2010 21:43
Выполнить код при закрытии окна просмотра segail Microsoft Office Excel 7 08.02.2010 11:22
TidHttp и 302 код ответа jokz Работа с сетью в Delphi 6 31.01.2010 23:02
Как сделат так, что бы при закрытии проекта появлялось сообщение monushka Помощь студентам 7 02.11.2007 08:12
Как отследить завершение выполнения потока TThread? Трик Общие вопросы Delphi 3 24.10.2007 14:55