(CodeLib-Manager)
Registriert seit: 10. Jun 2002
4.648 Beiträge
Delphi XE Professional
|
Re: WinSpy - Der Fenster Spion
11. Apr 2008, 10:33
Zitat von STS301:
aber wenn man den Startbutton disabled, funktioniert er immer noch per Windowstaste
Ich habe mal eine "unschöne" Funktion geschrieben, welche beides deaktiviert.
Delphi-Quellcode:
procedure ShowStartButton(bvisible: Boolean);
var
h: hwnd;
TaskWindow: hwnd;
begin
if bvisible then
begin
h := FindWindowEx(GetDesktopWindow, 0, 'Button', nil);
TaskWindow := FindWindow('Shell_TrayWnd', nil);
ShowWindow(h, 1);
Windows.SetParent(h, TaskWindow);
end
else
begin
h := FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil);
ShowWindow(h, 0);
Windows.SetParent(h, 0);
end;
end;
Thomas
|
|
Zitat
|