Zitat:
Das "Problem" mit dem Debug-Privilege wird aber irgendwann (in wahrscheinlich etwas fernerer Zukunft) ein Ende haben, da ich schon seit längerem ein neues Konzept plane, die Umsetzung wird nur leider doch noch etwas länger dauern..!
Ok, bin gespannt darauf...
Dennoch sollte jetzt die "No Debug-Privilege" Meldung nicht bei jedem Start kommen, denn
nach der 1. Meldung weiss man's...
Habe noch einen weiteren Fehler im FindWindow Code gefunden:
Fensterstruktur:
Delphi-Quellcode:
1770508: TAppBuilder "Delphi 6 - Project1"
1967222: TControlBar
1311916: TDockToolBar "Standard"
Generierter FindWindow Code von XSpy:
Delphi-Quellcode:
var
wnd: HWND;
begin
wnd := FindWindow('TAppBuilder', 'Delphi 6 - Project1');
wnd := FindWindowEx(wnd, 0, 'TControlBar', nil);
wnd := FindWindowEx(wnd, 0, 'TDockToolBar', 'Standard');
if wnd <> 0 then
begin
end;
end;
TDockToolBar wird nicht gefunden, warum?
Die Antwort auf die Frage überlasse ich dir...