var MyBitmap: TLazIntfImage; ScreenDC: HDC;begin MyBitmap := TLazIntfImage.Create(SdpoFastForm1.width,SdpoFastForm1.height); ScreenDC := GetDC(SdpoFastForm1.handle); MyBitmap.LoadFromDevice(ScreenDC); ReleaseDC(0,ScreenDC); MyBitmap.SaveToFile('/home/kodok/test.jpeg');