Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
Delphi 7 Enterprise
|
Re: Windows Taste Sperren
20. Apr 2008, 19:28
Zitat von toms:
Wenn du nur den Startbutton resp. das Startmenü deaktivieren möchtest, genügt auch dieser "unschöne" Code:
Delphi-Quellcode:
procedure ShowStartButton(bVisible: Boolean);
var
TaskWindow, h: HWND;
begin
if bVisible then
begin
h := FindWindowEx(GetDesktopWindow, 0, 'Button', nil);
if h <> 0 then
begin
TaskWindow := FindWindow('Shell_TrayWnd', nil);
ShowWindow(h, 1);
Windows.SetParent(h, TaskWindow);
end;
end
else
begin
h := FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil);
if h <> 0 then
begin
ShowWindow(h, 0);
Windows.SetParent(h, 0);
end;
end;
end;
der code funzt soweit ich weiß bei vista auch nicht..
|
|
Zitat
|