Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.13;
Скачать: CL | DM;

Вниз

Меню Пуск   Найти похожие ветки 

 
Laymer   (2005-09-08 07:51) [0]

Доброе время суток!!!
Подскажите пожалуста, как можно спрятать меню пуск?
Заранее благодарен!


 
Poirot ©   (2005-09-08 09:51) [1]

Где-то видел такое код.. не помню только где:9Сорри, если чей-то негласный...Собственно он прячет кнопочку.. :) Елси это надо:)

procedure StartButton(Visible: boolean);
var Tray, Child : hWnd;
    C : array[0..127] of Char;
    S : String;
begin
 Tray := FindWindow("Shell_TrayWnd", NIL);
 Child := GetWindow(Tray, GW_CHILD);
 while Child <> 0 do
  begin
   if GetClassName(Child, C, SizeOf(C)) > 0 then
    begin
     S := StrPas(C);
     if UpperCase(S) = "BUTTON" then
      begin
       if Visible then ShowWindow(Child, 1)
                  else ShowWindow(Child, 0);
      end;
    end;
   Child := GetWindow(Child, GW_HWNDNEXT);
  end;
end;


 
Laymer   (2005-09-08 13:22) [2]

Это не то. Мне надо чтоб меню вообще никак не выскакивало.


 
ANB ©   (2005-09-08 14:22) [3]


> Laymer   (08.09.05 13:22) [2]
- поставь таймер и закрывай появляющееся окно, как только вылезет.


 
DVM ©   (2005-09-08 15:45) [4]


> Это не то. Мне надо чтоб меню вообще никак не выскакивало.

Низкоуровневый хук на клавиатуру


 
Digitman ©   (2005-09-08 17:11) [5]


> спрятать меню пуск


ЧЕМ юзер повинился-то ?

ПОЧЕМУ юзер не вправе иметь сабж ?


 
Игорь Шевченко ©   (2005-09-08 17:30) [6]

ANB ©   (08.09.05 14:22) [3]


> - поставь таймер и закрывай появляющееся окно, как только
> вылезет.


DVM ©   (08.09.05 15:45) [4]


> Низкоуровневый хук на клавиатуру


Кривое не может сделаться прямым.


 
ANB ©   (2005-09-08 17:52) [7]


> Игорь Шевченко ©   (08.09.05 17:30) [6]
- на прямость и не претендовано, т.к. не понятно, для чего нужен сабж.



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

Текущий архив: 2005.11.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.025 c
14-1129810870
wHammer
2005-10-20 16:21
2005.11.13
Как перевести исходники с версии 6 на версию 5


1-1129653528
Rianon
2005-10-18 20:38
2005.11.13
Dll и немодальные формы правильно создать и убить


6-1122897901
Dr.Nemo
2005-08-01 16:05
2005.11.13
Чат на DELPHI при помощи арены на php


2-1130244687
Begin
2005-10-25 16:51
2005.11.13
Floating Point


1-1130231400
VID
2005-10-25 13:10
2005.11.13
OleContainer поднимает экспешн в обработчике OnChange !