Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
12. Aug 2009
Wenn ich dann aber zusätzlich den Fenstername kenne, und danach suche, sollte es doch sicher sein, oder?
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
12. Aug 2009
Und da sehe ich leider das Problem.
Folgende Sachen ergeben immer ein ungültiges Fensterhandle:
FindWindowEx(twHandle, 0, nil, nil)
FindWindowEx(0, twHandle, nil, nil)
FindWindowEx(twHandle, 0, '#32770:Dialog', 'XXX Hauptmenü')
FindWindowEx(twHandle, 0, '#32770:Dialog', nil)
FindWindowEx(twHandle, 0, nil, nil)
Mit FindWindowEx(0, twH1, 'XXXmain', 'XXX Hauptmenü') ermittle bzw. suche...
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
12. Aug 2009
ich kann leider nicht sagen, mit was diese Anwendung entwickelt worden ist. Das ist ein eingekauftes Programm.
kann ich das von dir Beschriebene irgendwie festellen und entsprechend reagieren?
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
12. Aug 2009
Und auch hier wird wieder in den True-Teil gesprungen und Anweisung für Anweisung durchgeführt, ohne Fehler.
Bei GetWindowsRect kommt ebenso immer eine 0 als Ergebnis.
Hierbei handelt es sich um ein Warenwirtschaftsprogramm, in diesem Fall um das CRM-Modul, von dem ich dir schon berichtet hatte, eine spezielle Entwicklung. Mit diesem Fenster habe ich unter anderem ja auch das Problem, wie...
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
12. Aug 2009
Stimmt, habe ich ganz übersehen.
Das Problem bleibt trotzdem :(.
Jetzt sagt er mir nach dem SetWindowsplacement im True-Fall in der If-Anweisung, daß der Vorgang erfolgreich beendet wurde. Wieso sind dann die Punkte immer noch 0 bzw. Min / Max -1?
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
11. Aug 2009
Ja, deswegen sind dort auch die ShowMessages auskommentiert, die habe ich schon zu Debug-zwecken genutzt.
Führe ich direkt nach dem SetWindowPlacement(twHandle, @tw1Plct); ein SysErrorMessage(GetLastError); aus, wird nichts angezeigt, kein Fehler. Was könnte ich noch prüfen?
Forum: Win32/Win64 API (native code)
Delphi
by LokutusvB,
11. Aug 2009
Ich habe folgendes probiert:
if GetWindowPlacement(twHandle, @tw1Plct) then begin
//ShowMessage('Links: ' + IntToStr(tw1Plct.rcNormalPosition.Left));
//ShowMessage('Oben: ' + IntToStr(tw1Plct.rcNormalPosition.Top));
//ShowMessage(IntToStr(tw1Plct.ptMinPosition.y));
tw1Plct.rcNormalPosition.Left := tw1Plct.rcNormalPosition.Left + 50;
tw1Plct.rcNormalPosition.Left :=...