Panel Professionel Resizen mit pfeilen etc...

[Fussball-Robby]

Verschieben:

Delphi-Quellcode:

procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  ReleaseCapture;
  (Sender as TWinControl).Perform(WM_SYSCOMMAND, $F012, 0);
end;

kan aber auch ins OnMouseDown