Forum: Object-Pascal / Delphi-Language
by Jonas Shinaniganz,
4. Mär 2012
himitsu hat absolut Recht, da du inzwischen das Event gewechselt hast kannst du einfach die Parameter benutzen.
procedure TForm1.Image2MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
image4.left := Y;
image4.top := X;
Forum: Object-Pascal / Delphi-Language
by Jonas Shinaniganz,
4. Mär 2012
Okay du bist der Bundeskanzler.
Erst sagst du dem Protokollanten, den du immer bei dir hast, er soll die Werte X und Y aufschreiben.
Dann schreibt der Protokollanten etwas auf. Danach sagst du dem Protokollanten, was X und Y ist.
Aber er hat schon geschrieben...
Du müsstest das ganze noch in die Richtige Reihenfolge bringen.
Forum: Object-Pascal / Delphi-Language
by Jonas Shinaniganz,
4. Mär 2012
Dass das Bild 'verschwindet' liegt daran, dass es auserhalb der Form liegt.
Du musst, bevor du die left/top Werte setzt noch P konvertieren.
nicht :
sonder :
Forum: Object-Pascal / Delphi-Language
by Jonas Shinaniganz,
4. Mär 2012
Hi,
Du hast ja schon:
Jetzt könntest du doch versuchen:
image1.Left := p.X;
Forum: Object-Pascal / Delphi-Language
by Jonas Shinaniganz,
4. Mär 2012
Die Mausposition könnte dir helfen!
var
p: TPoint;
begin
p := Mouse.CursorPos;
Dann hast du p.X und p.Y