delphi_悬浮窗口

function SetLayeredWindowAttributes(hwnd: HWND; crKey: Longint; bAlpha: byte; dwFlags: longint): longint; stdcall; external user32; //函数声明 implementation {$R *.dfm} procedure TForm1.btnCancelClick(Sender: TObject); begin Form1.Close; Application.Terminate; end; procedure TForm1.btnOkClick(Se

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

     文件        230  2011-01-10 09:56  悬浮1\Project1.dpr

     文件       4032  2011-01-10 09:56  悬浮1\Project1.dproj

     文件        830  2011-01-10 09:56  悬浮1\Project1.dproj.local

     文件     733184  2011-01-12 09:10  悬浮1\Project1.exe

     文件        213  2011-01-12 09:16  悬浮1\Project1.identcache

     文件       5280  2011-01-10 09:55  悬浮1\Project1.res

     文件       7020  2011-01-12 09:10  悬浮1\Unit1.dcu

     文件       1292  2011-01-11 15:17  悬浮1\Unit1.dfm

     文件       3340  2011-01-11 15:13  悬浮1\Unit1.pas

     文件       1078  2011-01-10 11:07  悬浮1\__history\Unit1.dfm.~18~

     文件       1078  2011-01-10 11:10  悬浮1\__history\Unit1.dfm.~19~

     文件       1078  2011-01-10 11:13  悬浮1\__history\Unit1.dfm.~20~

     文件       1060  2011-01-10 13:49  悬浮1\__history\Unit1.dfm.~21~

     文件       1060  2011-01-10 15:34  悬浮1\__history\Unit1.dfm.~22~

     文件       1060  2011-01-11 14:22  悬浮1\__history\Unit1.dfm.~23~

     文件       1260  2011-01-11 15:12  悬浮1\__history\Unit1.dfm.~24~

     文件       1229  2011-01-11 15:13  悬浮1\__history\Unit1.dfm.~25~

     文件       1264  2011-01-11 15:13  悬浮1\__history\Unit1.dfm.~26~

     文件       1292  2011-01-11 15:13  悬浮1\__history\Unit1.dfm.~27~

     文件       3289  2011-01-10 15:35  悬浮1\__history\Unit1.pas.~37~

     文件       3371  2011-01-11 14:52  悬浮1\__history\Unit1.pas.~38~

     文件       3291  2011-01-11 14:52  悬浮1\__history\Unit1.pas.~39~

     文件       3293  2011-01-11 15:00  悬浮1\__history\Unit1.pas.~40~

     文件       3291  2011-01-11 15:00  悬浮1\__history\Unit1.pas.~41~

     文件       3296  2011-01-11 15:01  悬浮1\__history\Unit1.pas.~42~

     文件       3301  2011-01-11 15:02  悬浮1\__history\Unit1.pas.~43~

     文件       3303  2011-01-11 15:06  悬浮1\__history\Unit1.pas.~44~

     文件       3334  2011-01-11 15:12  悬浮1\__history\Unit1.pas.~45~

     文件       2878  2011-01-11 15:13  悬浮1\__history\Unit1.pas.~46~

    ...D.H.         0  2011-01-11 15:17  悬浮1\__history

............此处省略4个文件信息