Forum: Sonstige Fragen zu Delphi
Delphi
by blink182,
7. Mär 2009
also,
am besten führst du noch ne boolean variable iszoom oder so ein und wenn die true ist dann
if ssLeft in Shift then begin
Image1.Canvas.LineTo(X div 2, Y div 2); end;
image1.Canvas.Pen.Color:=ClRed;
image1.Canvas.Pen.Width:=3;
image1.Canvas.MoveTo(X div 2,Y div 2);
Forum: Sonstige Fragen zu Delphi
Delphi
by blink182,
7. Mär 2009
hiho,
als wir in der Schule unser Navi programmiert haben, haben wir sowas auch gebraucht. Wir haben das bisschen anders gelöst. Wir haben eine Karte in ein Image geladen und mit copyrect in ein anderes kopiert. Ist jetzt nicht unbedingt der sauberste code, aber es hat funktioniert :)
Hierbei haben wir dann jeweils den Zoom um 30 Pixel in jede Richtung verwirklicht. Für dich dürfte Faktorx...