hi Leute,
Matzel hat hier
Komponente verschieben einen sehr einfachen und guten Weg gezeigt, wie man eine Komponente über WM_SYSCOMMAND's verschieben und in der Größe ändern kann. Leider gilt das nur für TWinControls. Wenn ich nicht was falsch gemacht habe, dann klappt das aber nicht bei TGraphicControl.
Bsp. für TWinControl im Ereignis OnMouseDown:
Delphi-Quellcode:
//Fängt alle Mausereignisse ab
ReleaseCapture;
// mit TWinCotrol verschieben, $F012 verschiebt das Control
TWinControl(self).Perform(WM_SYSCOMMAND, $F012, 0);
Gibt es sowas auch für TGraphicControl?
Das hat bei mit nicht geklappt:
Delphi-Quellcode:
//Fängt alle Mausereignisse ab
ReleaseCapture;
// mit TWinCotrol verschieben, $F012 verschiebt das Control
TControl(self).Perform(WM_SYSCOMMAND, $F012, 0);
Gruß oki