Wie ändert man die Position+die größe eines fremden Fensters

[coolpixel]

Ich habe folgendes Problem:

Ich möchte ein fremdes Fenster neu positionieren und die größe ändern. Mit der Maus ist es möglich.

Wie kann ich das automatisch aus meinem Programm machen ? z.B. die Größe 500*400 oder 450*300.

Wie kann ich die Position neu festlegen ? Das Handle des Fensters habe ich.

Sendmessage mit winsize....? und wenn wie übergebe ich welche koordinaten ? habe in MSDN nachgeschaut nur leider begreife ich das nicht.

Gibt es vielleicht eine andere Möglichkeit oder kann mir jemand sagen wie es in Delphi mit sendmessage und den koordinaten funktioniert ?


Danke. :-)

[Luckie]

SetWindowPos dürfte das sein, was du suchst. Eventuell reicht aber schon MoveWindow.

[coolpixel]

Danke für den Tip...

Leider habe ich da ja schon geschaut und wie gesagt ich weiß nicht wie...

egal ob mit winsize oder winpos oder winmove...

:-)

[Luckie]

Zitat:

Zitat von coolpixel

Danke für den Tip...

Leider habe ich da ja schon geschaut und wie gesagt ich weiß nicht wie...

egal ob mit winsize oder winpos oder winmove...

:-)

Du hast dir die Links nicht angeguckt oder? Ansonsten kann ich mir deine zusammenhangslose Nachfrage nicht erklären. das sind zwei API Funktionen, die du einfach mit den nötigen Paramatern aufrufen musst. Sind übrigens schon on der Windows.pas deklariert.

[coolpixel]

Ich weiß nicht wie die Parameter aussehen müssen. Das ist nicht zusammenhanglos.

Ich verstehe das nicht.

Das ist nicht einfach gemacht sondern ich begreife nicht wie ich die funktion aufrufe.

Danke trotzdem.

[Treffnix]

Die Parameter sind doch in der MSDN erklärt. :gruebel:

Ansonsten such mal hier im Forum nach SetWindowPos da findeste bestimmt auch nen paar Beispielaufrufe.

[Delphi-Freak]

Hi!
http://msdn.microsoft.com/library/de...movewindow.asp wäre der genaue Link für MoveWindow.
Das ganze könnte dann so ausschauen:

Delphi-Quellcode:

if not MoveWindow(Self.Handle { Fenster-Handle (HWND) }, 100 { X-Koordinate (Integer) }, 50 { Y-Koordinate (Integer) }, 500 { Breite (Integer) }, 300 { Hoehe (Integer) }, True { Fenster neu zeichnen (Boolean) }) then ShowMessage('Ein Fehler ist aufgetreten');

LG, Delphi-Freak