Как свернуть приложение в SystemTray?

← →
BOBAH © (2002-09-18 16:41) [0]

Подскажите, плиз, следующеи вещи:
1. Как приложение свернуть в SystemTry
2. Как заставить приложение запускаться при запуске Windows, без покладиние ярлыка в автозагузку (где это храниться в реестре)
3. Как убрать приложение чтоб оно по Alt-Tab не показывалось
заренее спасибо.

← →
Song © (2002-09-18 16:45) [1]

1. http://pascal.sources.ru/cgi-bin/forum/YaBB.cgi?board=delphi;action=display;num=1020241631
2.TRegistry - Ctrl+F1
3.SystemParametersInfo()

← →
BOBAH © (2002-09-19 12:08) [2]

> 2.TRegistry - Ctrl+F1
я знаю как работать с реестром, мне нужно знать где это в нем находится, времени нет искать

← →
andrey_pst © (2002-09-19 12:16) [3]

Да, ВОВАН, ты даешь :) знаешь как ездить на автомобиле, но не знаешь куда ключ зажигания вставляется ? так что-ли ?

Можешь сюда:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run

А вот так твою прогу не будет видно не по Alt+Tab, не на панели задач, а форма будет.

var WnHnd : Integer; Form: TFormTime; begin Application.Initialize; Application.CreateForm(TFormTime, Form); WnHnd:= GetWindowLong(Application.Handle, GWL_EXSTYLE); if (WnHnd and WS_EX_TOOLWINDOW)=WS_EX_TOOLWINDOW then WnHnd:= WnHnd-WS_EX_TOOLWINDOW else WnHnd:= WnHnd or WS_EX_TOOLWINDOW; Application.MainForm.Hide; SetWindowLong(Application.Handle, GWL_EXSTYLE, WnHnd); Application.MainForm.Show; Application.Title:= "Time"; Application.Run end.
{Сам тока вчера узнал в этом форуме :)}

А чтоб в трей свернуть читай в этом же форуме, или используй TrxTrayIcon

Как свернуть приложение в SystemTray? Найти похожие ветки