求控件！(100分)

求两个控件
1、给界面增加点动画，不要flash.ocx
2、delphi本身带一个事件触发控件，如文件拷贝、删除等等就触发该事件，但是只要指定目录下内容有变化就会发生，无法确定某些事件触发，某些事件不触发，例如，当有文件拷贝的时候触发，当文件删除时不触发，有这样细分事件的控件吗？

1、去找Gif控件， www.51delphi.com www.playicq.com 上面就有。
2、“如文件拷贝、删除等等就触发该事件，但是只要指定目录下内容有变化就会发生”，
这样的消息肯定有，而且肯定是广播的（broadcast），去查一下shell里面的消息。

RX控件组中就有一个GIF控件的。

对第一点，请采用TGifImage控件解决，应该是很方便就能找到下载的地方，如果没有，请给我发Mail，我给你；
对第二点，请使用Systool组件中的TStShellNotification组件，其事件属性很多，可以控制DELETE、Rename、AttribChange、DriveSpaceChange等好多好多的详细的事件，如果没有的话，此控件应该能找到下载的地方，我是3.03版的，以下是其具体的属性，请参阅，是否符合你的需要。
TStShellNotification = class(TStCustomShellNotification)
public
{ properties }
property MaxNotifications;
property ShellVersion;
property WatchPidl;
published
{ properties }
property Active;
property NotifyEvents;
property SpecialWatchFolder;
property WatchFolder;
property WatchSubFolders;

{ events }
property OnAssociationChange;
property OnAttributeChange;
property OnDriveAdd;
property OnDriveRemove;
property OnDriveSpaceChange;
property OnFileChange;
property OnFileCreate;
property OnFileDelete;
property OnFileRename;
property OnFolderChange;
property OnFolderCreate;
property OnFolderDelete;
property OnFolderRename;
property OnImageListChange;
property OnMediaInsert;
property OnMediaRemove;
property OnNetShare;
property OnNetUnShare;
property OnServerDisconnect;
property OnShellChangeNotify;
property OnShellDriveAdd;
end;

to redleaf_wgm:我的email:LL710915@163.com
请寄TStShellNotification3.03
以及TGifImage控件
谢谢