Delphi Einstieg HILFE!!!(Stern-Vieleck)

[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