Auf TPaintbox zeichen

[draeger1980]

Hi,

eigentlich ist das ja schon überall beschrieben aber irgendwie bekomme ich das nicht hin.

Also mein Code sieht so aus

procedure OnMouseDown:
begin
Paintbox1.Canvas.Moveto(X,Y);
end;

Eigentlich ganz simple aber haut nicht hin.
Ich bekomme dann wenn ich die Anwendung beende einen "Runtime Error" mmh echt komisch, kann mir da jemand weiter helfen ?

[DeddyH]

procedure OnMouseDown? Hast Du das selbst einfach so in den Source geschrieben?

[draeger1980]

nee,

natürlich nicht !

ich wollte halt nur den Kopf abkürzen, der sollte ja bekannt sein.

[himitsu]

na wenn das so ist :stupid:

also ich kann mir dann nicht vorstellen, daß es bezügliche dieser Funkion solch einen Fehler ergibt.

- was für eine Exception tritt denn auf?
- sicher, daß es an diesem MoveLine liegt? (des setzt ja nur den "Zeichen-Cursor")

[Fussball-Robby]

Delphi-Quellcode:

Paintbox1.Canvas.Moveto(X,Y);

Sorgt dafür, dass der "Stift" zur Posizion (X|Y) geführt wird, aber nicht zeichnet! Mittels LineTo wird von der aktuellen "Stiftposition" (die du ja schon setzt) zur angegeben Position eine Linie gezeichnet. Der Fehler wird aber nicht an dieser Zeile Code liegen.. Tritt der Fehler auch auf wenn du die Zeile auskommentierst?
Gruß