Fenster Position erkennen

[dazar_t]

Guten Tag

Ich arbeite grade an einem kleinen Projeckt. Ein Tier das auf dem Desktop herrumläuft usw. Also son bissle Quatsch

Nun wollte ich mir nen paar sachen von anderen leuten abgucken und wollte es so Programmieren das das Tier auf ein fenster fallen kann ( SPRICH: Ich ziehe das Tier ganz nach oben und es fällt auf die Taskleiste. Ist aber ein Fenster in der "Flugbahn" soll es schon dort "hinfallen").

Nur wie bekomme ich die Positionen bzw die Points von jedem Fenster um eine Kollisions kontrolle durchzuführen ?

MfG
DaZaRt

[Luckie]

Guck mal hier: GetWindowRect.

[dazar_t]

Danke

Doch leider habe ich ein problem. Ich habe jetzt mal so zum testen folgenden Code geschreiben :

Delphi-Quellcode:

var
Rec: TRect;
begin
GetWindowRect(Application.Handle,Rec);
Memo1.Lines.Add('TOP: '+IntToStr(Rec.Top)+'   Bottom: '+IntToStr(Rec.Bottom)+'   Left: '+IntToStr(Rec.Left)+'   Right: '+IntToStr(Rec.Right));

Doch leifert es immer die gleichen werte obwohl ich das fenster an andere positionen schiebe.

[DeddyH]

Ersetz mal Application.Handle durch self.Handle.

[Luckie]

Application ist das unsichtbare Anwendungsfenster der VCL, welches unter anderen für den Taskbareintrag verantwortlich ist. Du musst das Handle des Formulares angeben.

[dazar_t]

Dankeschön hat funktioniert.