Picturize example for Delphi

{ replace the current image in the main control with an image created
   from all the images present in c:\images. Resize all images present in that directory
   to 24x24 pixels and load them all in memory before proceeding }

Screen.Cursor:= crHourGlass;
LEADImage1->Picturize('c:\images', PICTURIZE_LOADALL+PICTURIZE_RESIZE, 24, 24);
Screen.Cursor:= crDefault;