Hallo,
habe ein Formular mit BorderStyle := bsNone erstellt. Dieses möchte ich aber trotzdem resizeable machen. Hierfür habe ich leere Images an die Ränder geklebt, die einen Resize-Cursor haben. Im OnMouseDown-Event habe ich folg. Code:
if Button = mbleft then begin
ReleaseCapture;
FormInstant.Perform(WM_SYSCOMMAND, $F008, 0);
end;
Jetzt gibt es aber folg. Problem: Das Fenster lässt sich nur rechts sowie unten vergrößern. Versuche ich es links und oben, passiert nichts. Interessanterweise kann ich links und oben allerdings das Fenster vergrößern, indem ich die Mouse nach rechts oder unten bewege. Allerdings wird das Fenster dann wieder rechts bzw. unten vergrößert, nicht links bzw. oben.
Kann noch jemand folgen?
Kurz gesagt: derzeit sind wohl nur zwei Richtungen möglich (nach rechts und nach unten). Ggf. muss ich SC_SIZE ($F008) auch anders aufrufen, um die korrekte Vergrößerung links und oben zu erhalten. Wenn ja: wie?
Danke für alle Tipps!