Delphi鼠标区域截图、抓图程序.rar

Delphi鼠标区域截图、抓图程序实例，类似QQ聊天时候的截屏程序一样，在实现方面：程序关键之处在于部分截取屏幕时使用了第二个启动即最大化的窗体，先截取整屏图象，用一个image控件充满窗体，然后在这个窗体中动态确定shape的大小及位置,对image中的片进形裁剪。
　　另在uses部分添加JPEG，用于将文件保存为jpg格式.在uses部分添加Clipbrd,用于复制到剪帖板。

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     620544  2008-10-07 14:47  codesc.net\delphi7_snap\screen_snap.exe

     文件       4795  2008-10-07 14:43  codesc.net\delphi7_snap\source\aboutunit.dcu

     文件      28952  2008-10-07 14:10  codesc.net\delphi7_snap\source\aboutunit.dfm

     文件       1044  2008-10-07 14:11  codesc.net\delphi7_snap\source\aboutunit.pas

     文件      20934  2008-10-07 10:49  codesc.net\delphi7_snap\source\cam_down_48.ico

     文件       1078  1998-04-24 00:00  codesc.net\delphi7_snap\source\DRIVE.ICO

     文件       2550  2008-04-23 18:12  codesc.net\delphi7_snap\source\nobother.ico

     文件       2315  2008-10-07 14:28  codesc.net\delphi7_snap\source\screen_snap.dof

     文件        349  2008-10-07 14:28  codesc.net\delphi7_snap\source\screen_snap.dpr

     文件      21256  2008-10-07 11:39  codesc.net\delphi7_snap\source\screen_snap.res

     文件       8696  2008-10-07 14:47  codesc.net\delphi7_snap\source\Unit1.dcu

     文件         51  2008-10-07 14:47  codesc.net\delphi7_snap\source\Unit1.ddp

     文件      13209  2008-10-07 14:42  codesc.net\delphi7_snap\source\Unit1.dfm

     文件       4800  2008-10-07 14:46  codesc.net\delphi7_snap\source\Unit1.pas

     文件       5463  2008-10-07 14:43  codesc.net\delphi7_snap\source\Unit2.dcu

     文件       1550  2008-10-07 14:26  codesc.net\delphi7_snap\source\Unit2.dfm

     文件       2282  2008-10-07 14:27  codesc.net\delphi7_snap\source\Unit2.pas

     目录          0  2014-09-23 10:48  codesc.net\delphi7_snap\source

     目录          0  2014-09-23 10:46  codesc.net\delphi7_snap

     目录          0  2014-09-23 10:47  codesc.net

----------- ---------  ---------- -----  ----

               739868                    20