Forum: Sonstige Fragen zu Delphi
by Luckie,
9. Okt 2008
Funktioniert leider nur halb. So bald unter Flex der Mauszeiger das Shape verlässt, bewegt es sichnicht mehr. Aber da werde ich mal näher im einem Felx Forum fragen.
Forum: Sonstige Fragen zu Delphi
by Luckie,
9. Okt 2008
Perfekt. :thumb: Ich habe mir schon überlegt, ob das irgendwie mit sinus und cosinus geht oder so. Jetzt muss ich das ganze nur noch nach Flex übertragen. :roll:
Forum: Sonstige Fragen zu Delphi
by Luckie,
9. Okt 2008
Ja. Auch wenn ich die Maus irgendwie schräg bewege muss es sich im 45° Winkel bewegen. Es soll sich so verhalten wie die Punkte zum Anfassen für Größenänderungen an Objekten in den Ecken, wenn das Objekt nur proportional in der Größe verändert werden kann. Das heißt wenn ich die Maustaste über dem Objekt drücke und dann die Maus bewege, muss ich das Shape mitbewegen. Wenn ich die Maus (mit...
Forum: Sonstige Fragen zu Delphi
by Luckie,
9. Okt 2008
Ich verschiebe mit der Maus eine Shape:
procedure TForm1.Shape1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
XMouseDown := X;
YMouseDown := Y;
IsOver := true;
end;
procedure TForm1.Shape1MouseUp(Sender: TObject; Button: TMouseButton;