Moinmoin!
Ja ich wieß, ich hab en bisschen länger gebraucht, aber i-wie is das thema bei mir en bisschen untergegangen.
Jetzt hat sich aber folgende Frage bei folgendem QT aufgetan:
Delphi-Quellcode:
function CallWndProc(Code :Integer; wParam: wParam; lParam: lParam):lResult; stdcall;
var
CWP : PCWPStruct;
Name : array[0..255] of Char;
begin
try
if Code = HC_ACTION then
begin
CWP := PCWPStruct(lParam);
with CWP^ do
begin
GetWindowText(hwnd, Name, 255);
if Name = 'Nachrichtendienst '
then windows.Beep(1000,200);
end;
end;
finally
Result := CallNextHookEx(g_hHookKbdLL, Code, wParam, lParam);
end;
end;
Hat jemand ne idee, warum sich da die Explorer.exe aufhängt?
Zumindest, wenn ich den Hook installier, macht die Explorer.exe so lange nichts mehr, bis ich den Hook wieder deinstallier!
um das mal vornweg zu nehmen:
Ich bin mir zu 90% sichen KEIN 64bit WinSystem zu haben:
"WinXP Prof - ServisPack3
Wäre dankbar über ne schnelle Antwort
Edit:
Ich habe HIER noch einen sehr nützlichen Beitrag gefunden der gut zum Thema passt.
Bevor andere wie ich vorher 4 stunden lang rumwerkeln um dann zu merken, dass das ganze shconim I-net steht und 1:1 übernommen werden kann ^^
http://www.delphipraxis.net/internal...?p=14034#14034