TImage, me da problemas al cargar grandes imagenes.

[MAXIUM]

Ya estoy con el cerebro en las manos, no logro que un TImage haga algo tan sencillo como esto:

Código Delphi [-]
     Image1.Width := 3970;
     Image1.Height:= 4600;
     Image1.Canvas.FloodFill(1, 1, clWhite, fsSurface);

No se como solucionarlo, me da un problema de Espacio de almacenamiento insuficiente...