if ImgScan1.ScannerAvailable then try ImgScan1.OpenScanner; ImgScan1.ScanTo := 2; ImgScan1.Image:='c:\MyPicture.gif'; ImgScan1.StartScan ; Application.ProcessMessages; finally ImgScan1.CloseScanner ; end;