ich würde die Bilder selbst verkleinern und das verkleinerte Bild im TImage (ohne Stretch) laden. Ansonsten muss das TImage bei jedem Paint das Bild neu verkleinern.
Verkleinern in guter Qualität geht unter anderem so:
Delphi-Quellcode:
SetStretchBltMode(DstCanvas.Handle, STRETCH_HALFTONE);
SetBrushOrgEx(DstCanvas.Handle, 0, 0, nil);
StretchBlt(...);