請問各位!
我有一個需求, 當程式運行中必須利用程式自動將某一運行畫面如PrintScreen般, 由系統自動給擷取成jpg圖存檔, 這個擷取動作是否有辦可達成, 謝謝!

USES Clipbrd;
procedure TForm1.BitBtn1Click(Sender: TObject);
var
Bitmap : TBitmap;
begin
Bitmap := TBitMap.create;
try
Bitmap.LoadFromClipBoardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
Canvas.draw(0,0,Bitmap);
finally
Bitmap.free;
end;
end;

------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！

子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！