Ist keine Grafik vorhanden, muss der Bitmap zumindest die Größe der Zeichenfläche zugewiesen werden, sonst kann man nicht zeichnen.
Greift man ohne Bild auf TImage.Canvas (statt TImage.Picture.Bitmap.Canvas) zu, wird eine weiße Bitmap von der aktuellen Größe von TImage angelegt.