Titelloses Fenster eines Fremdprogrammes positionieren?

[PeterPanino]

Hallo! Alle mir bekannten Utilities zur Positionierung von Fremdprogrammen auf dem Desktop verwenden zur Identifizierung eines bestimmten Programmes, dessen Bildschirmposition verändert werden soll, den Titeltext (Caption) des betreffenden Programmfensters. Nun habe ich aber den Fall eines GUI-Programmes, das keinen Fenstertitel hat. Wie kann ein solches Programm identifiziert und dann seine Bildschirmposition verändert werden?

[HalloDu]

Eventuell ist das über den Fensterklassennamen möglich. WinSpy oder ähnliches sollte da helfen.

[quendolineDD]

Eventuell an dem Namen des Prozesses? Daran kannst du doch die Prozess-Id ermitteln und weiterführend davon die Fenster. Oder liege ich falsch?

[PeterPanino]

In WinSpy++ wird bei Class "#32770 (Unicode)" angezeigt. Ist das ein temporärer Wert oder kann dies einer Fensterklasse explizit zugeordnet werden?

Aus dem Prgrammnamen das Fensterhandle ermitteln? Werde dem mal nachgehen. Sollte jemand da schon eine fertige Lösung haben, wäre das natürlich erst mal positiv ...!

[PeterPanino]

Hallo, ich habe es jetzt geschafft, die PID und das Fensterhandle vom Programmnamen zu bekommen:

Delphi-Quellcode:

program RepositionWindowFromExeName;

{$APPTYPE CONSOLE}

uses
  Dialogs, // debug
  JclSysInfo,
  SysUtils, Windows;

var
  APID: Cardinal;
  AHandle: THandle;
  rc: TRect;

begin
  try
    APID := GetPidFromProcessName('QGet.exe'); // 11424
    if APID <> INVALID_HANDLE_VALUE then
    begin
      AHandle := GetMainAppWndFromPid(APID);
      MessageDlg(GetWindowCaption(AHandle), mtInformation, [mbOK], 0); // leer!
      GetWindowRect(AHandle, rc);
      MessageDlg(IntToStr(rc.Left)   + #13#10 +
                 IntToStr(rc.Top)    + #13#10 +
                 IntToStr(rc.Right)  + #13#10 +
                 IntToStr(rc.Bottom) + #13#10
                 , mtInformation, [mbOK], 0);
    end;
  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.

GetWindowCaption:
http://img255.imageshack.us/img255/7...dowcaption.gif

GetWindowRect:
http://img24.imageshack.us/img24/5908/getwindowrect.gif

Wie man sieht, funktioniert das Erfassen der Fensterkoordinaten nicht. Könnte jemand weiterhelfen?

[Luckie]

Nicht nur das Erfassen funktioniert nicht. Hast du denn schon mal geguckt, ob das Fensterhandle überhaupt gütig ist? nd woher kommt die Funktion GetMainAppWndFromPid? Kommt die aus Jcl? hast du diese schon mal debuggt und geguckt, was da passiert?

Was hast du überhaupt schon unternommen, um den Fehler zu finden?

[PeterPanino]

Zitat:

Zitat von Luckie

Nicht nur das Erfassen funktioniert nicht. Hast du denn schon mal geguckt, ob das Fensterhandle überhaupt gütig ist? nd woher kommt die Funktion GetMainAppWndFromPid? Kommt die aus Jcl? hast du diese schon mal debuggt und geguckt, was da passiert?

Was hast du überhaupt schon unternommen, um den Fehler zu finden?

Eine ganze Menge! Ich bitte dich außerdem, einen anderen Ton mir gegenüber zu verwenden! Wenn du etwa glauben solltest, dass ich nur Fragen stelle ohne selbst etwas zu tun (s. paralleler Thread), dann hast du dich gründlich getäuscht! Ich habe für dieses Forum schon eine Menge eigenen Code geschrieben! Bitte lass deine Vorurteile an jemand anderem aus!

Um wieder zum Thema zurückzukehren: Es ist mir jetzt gelungen, die Koordinaten des Fensters herauszufinden:

Delphi-Quellcode:

program RepositionWindowFromExeName;

{$APPTYPE CONSOLE}

uses
  Dialogs, // debug
  JclSysInfo,
  SysUtils, Windows;

var
  AHandle: THandle;
  rc: TRect;

begin
  try
    AHandle := FindWindow('#32770', nil);

    GetWindowRect(AHandle, rc);

    MessageDlg(IntToStr(rc.Left)   + #13#10 +
               IntToStr(rc.Top)    + #13#10 +
               IntToStr(rc.Right)  + #13#10 +
               IntToStr(rc.Bottom) + #13#10
               , mtInformation, [mbOK], 0);

  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.

Jetzt muss ich nur noch eine Methode finden, die Koordinaten des Fensters zu ändern.

[Luckie]

Also ich wüßte nicht, was an meinem neutralen Ton daneben war. Und die Frage. was du schon probiert hast, habe ich nur gestellt, damit wir nicht Vorschläge machen, die du schon alle probiert hast.

Den Klassennamen in diesem Fall zu verwende ist schlecht. Jedes mit der MFC erzeugte Fenster hat diesen Klassennmane, er ist also nicht unbedingt eindeutig.

[verwirrt]

Zitat:

Zitat von PeterPanino

Jetzt muss ich nur noch eine Methode finden, die Koordinaten des Fensters zu ändern.

SetWindowRect

[PeterPanino]

Zitat:

Zitat von Luckie

Also ich wüßte nicht, was an meinem neutralen Ton daneben war. Und die Frage. was du schon probiert hast, habe ich nur gestellt, damit wir nicht Vorschläge machen, die du schon alle probiert hast.

Nichts für ungut, ich habe vielleicht etwas überreagiert.

Zitat:

Zitat von Luckie

Den Klassennamen in diesem Fall zu verwende ist schlecht. Jedes mit der MFC erzeugte Fenster hat diesen Klassennmane, er ist also nicht unbedingt eindeutig.

Du meinst, dass der Klassenname '#32770' womöglich bei mehreren Programmen vorkommt? Und wie kann man sonst über die PID an das fenster-handle kommen?