Buchstaben auf Tastendruck ...

[patti]

Ich kann in dem von dir gepostetem Quelltext-Ausschnitt nirgends einen Aufruf deiner Zeichen-Routine sehen...
Des Weiteren sollte man auf eine PaintBox-Canvas nur in dem TPaintBox-Event "OnPaint" zeichnen, nicht in einer x-beliebigen Funktion (wobei man natürlich einzelne Fragmente in andere Methoden auslagern kann, aber die müssen dann eben aus der OnPaint-Routine raus aufgerufen werden), da sonst der Inhalt der PaintBox-Canvas beim nächsten Paint-Aufruf verloren ist. Deshalb also entweder einmalig auf ein Bitmap-Canvas malen und im OnPaint der PaintBox dann das Bitmap auf der Canvas ausgeben, oder im OnPaint-Ereigniss jedes mal alle Buchstaben aufs neue auf der PaintBox-Canvas ausgeben.

Edit: Beim OnKeyPress bekommst du übrigens gleich einen Parameter vom Typ char übergeben. Außerdem solltest du unbedingt die Eigenschaft "KeyPreview" deines Formulars auf true setzen, da es sonst passieren kann, dass das Key-Event nicht an dein Formular "durchgereicht" wird!