Hallo Delphigemeinde,
vielleicht kann mir jemand bei dem unteren Code weiterhelfen.
Ich habe ein kleines und ein grosses Bild. Wenn ich den Mauszeiger auf dem kleinen Bild bewege, soll ich das zweite, grosse Bild bewegen, damit immer derjenige Ausschnitt (vergrössert) angezeigt wird.
Leider klappt das nicht. Wo hab ich einen Fehler gemacht.
Zur Kontrolle lasse ich mir die Koordinaten vom Mauszeiger anzeigen
Vielen Dank für jeden Hinweis
LingNeu
Delphi-Quellcode:
procedure TMainForm.Image2MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
// wo ist die Maus auf dem kleinen Bild
lbl_coord1.Caption := inttostr(x);
lbl_coord2.Caption := inttostr(y);
// das grosse Bild soll sich bewegen
imgview321.Bitmap.Create.MoveToX(x+50,y+50);
end;