Zitat von
maxrus:
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]
ich glaub ich weiß wo das problem lag,mein image feld war falsch plaziert,der könnte gar nicht zeichnen, jetzt hab ich imagefeld nach oben links in (0/0) gebracht ,zeigt mir aber trotzdem nur weißes rechteck?!?