Hi,
gibt es eine Chance in der FormResize-Methode (FMX) festzustellen, ob der User noch am Border am resizen ist oder nicht?
Wenn das FormResize ein einmalige Ereignis ist, wie Maximized->Normal oder Bildschirm-Wechsel funktioniert bei mir alles tadellos, aber wenn der User selbst am Rand der Anwendung (im Status Normal) die Größe ändert, will ich einen Part des Codes nur durchlaufen, wenn er damit fertig ist.
Grüße, Philipp
Form <> Form ?
Ist das verhalten bei einer FMX Form denn anders?
Wenn gleich dann kannst du das etwa so prüfen..
Rechter Border..
Delphi-Quellcode:
if Msg = WM_NCHITTEST then
begin
P.X := LoWord(lP);
P.Y := HiWord(lP);
GetClientRect(WinHandle, rc);
xF := rc.Right;
BORDER := GetSystemMetrics(32); // = SM_CXFRAME
// Rechte Seite
if (P.X >= xF - 8) then
begin
if (P.X >= xF - BORDER) then
HITTEST := HTRIGHT;
end;
end;
Wenn HITTEST = HTRIGHT dann befindest du dich über den rechten Border wenn nicht führe deine Funktion aus.
Aber ob das ausreicht für dein bestreben mag dahin gestellt sein denn eigentlich werden anschließend die Anchors enumeriert.
Und danach müsstest du handeln.
Bei normalen Forms wirst du WM_NCHITTEST wohl überschreiben müssen..
procedure WMNCHitTest(var AMessage: TWMNCHitTest); message WM_NCHITTEST;
Nachtrag..
Für P.X, P.Y verwende besser
Delphi-Quellcode:
P.X := GET_X_LPARAM(lP);
P.Y := GET_Y_LPARAM(lP);
ansonsten kann es passieren das du bei Multimonitoren die Falsche Position bekommst.
https://docs.microsoft.com/en-us/win...clbuttondblclk
gruss