Einzelnen Beitrag anzeigen

Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#28

Re: Fensterposition anzeigen?

  Alt 25. Jan 2007, 21:53
Zitat von Hawkeye219:
Hallo,

mit ReleaseCapture beendest du die Verarbeitung der Mausnachrichten bis zum nächsten Capture, das MouseUp-Ereignis dürfte also nicht ausgelöst werden. Du könntest aber die Nachricht WM_WINDOWPOSCHANGING im Formular abfangen:

Delphi-Quellcode:
type
  TForm1 = class (TForm)
  private
    procedure WMWindowPosChanging (var Message: TWMWindowPosChanging);
      message WM_WINDOWPOSCHANGING;
  end;

procedure TForm1.WMWindowPosChanging (var Message: TWMWindowPosChanging);
begin
  inherited;
  Label1.Caption:=IntToStr(Top);
end;
Gruß Hawkeye

Wegen eines anderen Threads wurde ich hierher gelinkt (thx Hawkeye)...
Dumm nur, dass ich ein Fehler bekomme:
"Nicht deklarierter Bezeichner 'TWMWindowPosChanging'"
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat