Firemonkey Form ohne Titelleiste verschieben

ChrisCross · Verfasst: Di 24.12.13 11:00

Hallo,

für VCL habe ich folgenden Code gefunden, um das Fenster ohne Titelleiste zu verschieben:

Delphi-Quelltext

1:
2:
3:
4:

 if ssLeft in Shift then begin
ReleaseCapture;
Self.Perform(WM_NCLBUTTONDOWN, HTCAPTION, varEmpty);
end;

In Fiermonkey wird folgende Fehlermeldung ausgegeben:

[dcc32 Fehler] Unit1.pas(31): E2003 Undeklarierter Bezeichner: 'Perform'
[dcc32 Fehler] Unit1.pas(31): E2003 Undeklarierter Bezeichner: 'HTCAPTION'

Kennt jemand einen alternativ Code?

Frohe Weihnachten, Christoph

_________________
Christoph
Unser Mathelehrer: Das ist der letzte Matheblock in dieser Woche … Er hat aber gerade erst angefangen. Was die gute und was die schlechte Nachricht ist, kann sich jeder selbst aussuchen.

jaenicke · Verfasst: Di 24.12.13 12:45

Die genannte Funktionalität beruht auf der Windows API und funktioniert daher mit Firemonkey nicht. Du musst das daher selbst implementieren, das sind ja nur wenige Zeilen Code. OnMouseDown, OnMouseMove und OnMouseUp gibt es ja auch bei Firemonkey. ;-)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme