|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Delphi 2010, cкрыть приложение с панели задач
Нужно скрыть приложение с панели задач.
То, что работало в Delphi 7: Код:
ShowWindow(Application.Handle, SW_HIDE); Код:
WL := GetWindowLong(Application.Handle, GWL_EXSTYLE); SetWindowLong(Application.Handle, GWL_EXSTYLE, WL or WS_EX_TOOLWINDOW); Кто-нибудь сталкивался с такой проблемой? |
#2
|
||||
|
||||
Забавно, у меня работает...
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#3
|
||||
|
||||
А у меня нет. Если скрывать в OnShow или OnActivate формы, тогда работает, но это не подходит, т. к. приложение успевает появиться на панели задач прежде чем выполняется этот код.
|
#4
|
||||
|
||||
dpr файл:
Код:
program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); ShowWindow(Application.Handle, SW_HIDE); SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.Run; end. Пишу программы за еду. __________________ |
#5
|
||||
|
||||
NumLock, именно так я всегда и делал (только без ShowWindow, в D7 хватало одного SetWindowLong) и в этот раз пытался сделать также, но в D2010 это почему-то не срабатывает.
|
#6
|
||||
|
||||
Цитата:
Цитата:
Интересно, как это? Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |
#7
|
||||
|
||||
Что именно? Обычно я писал так:
Код:
begin Application.Initialize; SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.CreateForm(TForm1, Form1); Application.Run; end. Последний раз редактировалось ryderx34, 17.07.2011 в 23:44. |
#9
|
||||
|
||||
А какая разница (кроме переменной WL, от использования которой ничего по сути не меняется)? Или я всё-таки не понимаю вопроса...
Последний раз редактировалось ryderx34, 18.07.2011 в 00:16. |
#10
|
||||
|
||||
Дальнейший разговор слепого с глухим бессмысленен.
Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |
#11
|
||||
|
||||
запусти сначала готовый exe, потом сам откомпилируй:
http://data.cod.ru/115992 Пишу программы за еду. __________________ |
#12
|
||||
|
||||
И? Я уже дважды писал, в Delphi 2010 это не работает!
Это не работает начиная с Delphi 2007, и не у меня одного, так что не надо писать "у меня всё работает": delphi.about.com/hide the taskbar button: Цитата:
|
#14
|
||||
|
||||
Application.MainFormOnTaskBar:=.....
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#15
|
||||
|
||||
Не поможет.
Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |