Zitat von
jfheins:
Ich will mal so nett sein. Läuft eh nix im TV
Delphi-Quellcode:
procedure DrawLine(img: TImage; From, To: TPoint)
begin
img.Canvas.MoveTo(From.X, From.Y);
img.Canvas.LineTo(To.X, To.Y);
end;
Zeichnet eine Linie von einem Punkt zu einem anderen Punkt
Danke,hab ausprobiert ging aber nicht.ich muss doch bestimmt davor was vordefenieren , vor begin oder?