Linien auf vorhandenes Bitmap In TImage zeichnen

[bitsetter]

Ohne Code kann man da wohl nicht groß weiterhelfen oder bestenfalls Vermutungen anstellen. Wenn es beim debuggen geht und sonst nicht wird es wohl noch schwieriger. Dann könnte man zu Testzwecken die Werte mit Hilfe einer Messagebox oder einer Listbox ausgeben lassen.

Wird der Code überhaupt ausgeführt oder wird das Bild danach wieder überzeichnet? Dazu könntest du einfach mal kurz ein image1.Picture.Bitmap.Canvas.Rectangle(10,10,20,20); in die Prozedur mit einbauen und mal sehen ob wenigstens das Rechteck angezeigt wird.
Wird im onCreate Ereignis dein Code ausgeführt?