Zitat von
fkerber:
Hi!
Das begin muss vor der Zeile mit dem with stehen.
Außerdem musst du ihm natürlich sagen, von wo nach wo er die Linie zeichnen soll - mit x1 und x2 kann er nichts anfangen.
Grüße, Frederic
Delphi-Quellcode:
procedure TForm1.Image1Click(Sender: TObject);
begin
with image1.canvas do
image1.Canvas.MoveTo(0,70);
image1.Canvas.LineTo(0,70);
end;
end.
Jetzt sagt er mir:[Fataler Fehler] Ausgabedatei 'C:\Program Files\Borland\Delphi6\Projects\Project1.exe' kann nicht erstellt werden
[edit=mkinzler]Delphi-Tag eingefügt Mfg, mkinzler[/edit]