Сворачивание программы

[=master=]

Вообще затея конечно странная, и будет вводить пользователей в ступор. Вот работает он работает, тут приспичило, возвращается, программа закрыта, данные потеряны, опять полчаса вбивать тоже самое.
На месте пользователя я тут-же отправил бы программу в корзину, без угрызений.

Ну а по делу, думаю достаточно будет повесить хук на клавиатуру ( может еще и мышку) и ловить соотв. действия.

[WorldMaster]

Сообщение от =master=

Вообще затея конечно странная, и будет вводить пользователей в ступор.
На месте пользователя я тут-же отправил бы программу в корзину, без угрызений.

Вот мне интересно неужели на форуме происходит обсуждение идей?? Какая разница зачем он это придумал и как, клавное что ТС хочет узнать как сделать так чтобы это работало.
Почему бы вместо пустословия просто помочь человеку советом.

Сообщение от =master=

Ну а по делу, думаю достаточно будет повесить хук на клавиатуру ( может еще и мышку) и ловить соотв. действия..

Можете же когда захотите.

[EUGY]

Зачем хуки на мышь и клаву?
Нужно следить за главным циклом приложения.
То есть хук WH_GETMESSAGE на основной поток, благо ничего сложного, так как приложение свое. И в нем уже следить за клавиатурной и мышиной возней.
плохо знаю делфи, но там вроде есть объект Application, ни как к его циклу не подобраться?

[BDA]

WorldMaster, не соглашусь с вами.
Например, человек спрашивает: Решил убивать людей. Что посоветуете в качестве основного "орудия труда".
Вряд ли вы скажете: Берите дробовик. Веселуха будет.
Любая идея имеет право на обсуждение ее полезности.
Человека, возможно, нужно поправить, а не дать осуществить какую-либо бредовую (никоим образом не называю этим словом данную тему, т.к. все зависит от назначения программы) идею.

[WorldMaster]

Сообщение от BDA

WorldMaster, не соглашусь с вами.
Например, человек спрашивает: Решил убивать людей. Что посоветуете в качестве основного "орудия труда".
Вряд ли вы скажете: Берите дробовик. Веселуха будет.
Любая идея имеет право на обсуждение ее полезности.
Человека, возможно, нужно поправить, а не дать осуществить какую-либо бредовую (никоим образом не называю этим словом данную тему, т.к. все зависит от назначения программы) идею.

Ну вы в крайность полезли. Как мне кажется. Просто в большинстве случаев получается что ТС открывает тему чтобы узнать как сделать тото и тото, а тема в итоге перерастает в обсуждение того что идея плохая и ничего у него не выйде, а толковых ответов 1 или 2 штуки.
Я считаю что если человек чем то интересуется, надо подсказать как реализовать, то что можно было по другому и более профессионально сделать он потом сам дойдет. Может это просто интерес у новичка. не все ведь сразу профи становятся, из своего опыта скажу что я также пытался кодировать разные задачи которые в голову приходили. Тоже местами не правильные но этим путем познавался механизм программирования, вырабатывались какие то свои методы подхода к решинию.

А когда сразу сходу начинают со всех сторон голосить что идея фигня, никому не нужна и все такое, такое отношение убивает всякое желание чем то заниматься.

[=master=]

EUGY Почему не подобраться, там даже есть спец. компонент applicationevents, но честно, не помню как он работает, автор может и его справку посмотреть.

[EUGY]

Ну да, действительно, все еще проще...

procedure TForm1.OnMessage(var MSG: tmsg; var Hand: Boolean );
begin
 {}
end;


procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage :=  OnMessage;
end;

[a_n_n_a]

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := OnMessage;
end;

А можно подробнее?)) Это куда и как?))

[BDA]

Это руками в среде разработки
Пример приложен.

УПД Еще пример.

[a_n_n_a]

Спасибо, BDA, буду разбираться)))))