我的主页:http://www.tommstudio.com/ unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, shlobj, activex, StdCtrls, FileCtrl,strUtils; const shcne_renameitem = $1; shcne_create = $2; shcne_delete = $4; shcne_mkdir = $8; shcne_rmdir = $10; shcne_mediainserted = $20; shcne_mediaremoved = $40; s...
[ 查看全文 ]