![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Disable Start menu on descktop doubleclik [D3, D4, D5, D6, Win95/98]
Serge © (2004-01-16 10:32:00)Приветствую всех. Возник вот такой вопрос - я из программы скрываю десктоповские иконки и таскбар иже с ними, после этого если сделать дабл-клик на десктопе то выскакивает StartMenu - а мне он ни к чему. Если кто знает как запретить вывод StartMenu прошу ответить.
Заранее спасибо!
Serge (2004-01-16 18:10:00) [1]Вижу что никто не удостоил вниманием мой вопросик (кроме DVM ©)- так что придется поступать некультурно - вырубать мышу, потом врубать ее обратно.
Успехов всем.
Serge (2004-01-16 11:39:00) [2]Вот код:
Procedure TForm1.FormCreate(Sender: TObject);
Begin
ShowWindow(FindWindow('Progman', 'Program Manager'), SW_HIDE);
If Not (csDesigning In ComponentState) Then
ShowWindow(FindWindow('Shell_TrayWnd', Nil), SW_HIDE);
{ EnableWindow(FindWindow('Shell_TrayWnd', Nil), False);
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),
0,
'Button',
nil),
false);}
End;
Procedure TForm1.FormClose(Sender: TObject; Var Action: TCloseAction);
Begin
ShowWindow(FindWindow('Progman', 'Program Manager'), SW_SHOW);
ShowWindow(FindWindow('Shell_TrayWnd', Nil), SW_ShowNormal);
{ EnableWindow(FindWindow('Shell_TrayWnd', Nil), True);
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),
0,
'Button',
nil),
true);}
То что закоментированно - пробовал но не помогает.
DVM (2004-01-16 11:22:00) [3]Скрой окно Progman