Moin,
beim Vergrößern des Images wird die Zeichenfläche bzw. Canvas nicht vergrößert. Das musst du noch manuell erledigen. Folgendes fällt mir gerade ein:
Delphi-Quellcode:
Image1.Picture.Graphic.Width := Image1.Width;
Image1.Picture.Graphic.Height := Image1.Height;
Edit: Hatte mehrere Möglichkeiten gepostet, doch die waren Mist.