
Zitat von
Akut-Programming:
Größe sollte änderbar sein -> Hab momentan noch keine Idee, wie ich das hinbekomme, dadurch das die Anwendung ja keine Titelleiste mehr hat
Das kannst Du z.B. machen, indem Du ein Image, Shape oder was auch immer an der gewünschten Griff-Position auf Dein Formular setzst, und dann im MouseDown so tust, als ob Du in der rechten unteren Ecke wärst:
Delphi-Quellcode:
procedure TForm1.Shape1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
Begin
// Maus freigeben
ReleaseCapture;
// Ecken-Klick simulieren
PostMessage(
Handle,WM_NCLBUTTONDOWN,HTBOTTOMRIGHT,0);
End;
Gruß, teebee