Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];

Вниз

Как свернуть приложение в 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


 
Separator   (2002-09-19 12:28) [4]

А вот так твою прогу не будет видно не по 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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.017 c
1-98099
Serg455
2002-09-19 01:32
2002.09.30
MessageBox


1-98067
Оля
2002-09-19 11:38
2002.09.30
Считывание файла Excel в F1Book1


4-98418
Vaddya
2002-08-10 13:02
2002.09.30
Добавление флага стиля и обновление окна


3-97944
maxim2
2002-09-09 06:29
2002.09.30
Не могу понять где ошибка?


1-98209
Losyara
2002-09-18 16:38
2002.09.30
OLE Automation для Excel





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский