萧月禾急寻找3个控件！！(200分)

1、GRID控件
要求：
1）可锁定指定列数的前面几列，即字段数过多过长，GRID窗口显示不下

时，拖动下方的滚动条，被锁定的列不随着滚动条滚动。比如一张描述个

人信息的表，第一列是姓名，后面的是描述其他属性的字段，在拖动下方

的滚动条时，姓名不随着移动，只移动其后面的属性。
2）可通过点击GRID最上面的列名来对该列进行排序。
3）不要和DBGRID相似的控件，因为需要对每个单元格进行读写操作，即

需要StringGrid相似的。
4）美观。我试过TopGrid、XlGrid等，都不合适，后来找到一个SortGrid

，继承于StringGrid，但其锁定列后，被锁列的外观便和其他列不同，另

还有其他不太好的地方，于是弃之。

2、IMAGE控件
要求：
可在属性里定义Picture1和Picture2，初始显示的是Picture1，当鼠

标移动到其上时，IMAGE显示Picture2。
或者是只在属性里定义Picture1，当鼠标移动到其上时，Picture1发

亮。即类似于在网页上的按钮效果。

3、flash控件
能在程序窗体上嵌套flash动画（同时希望能找到一个类似六合彩摇珠的

flash动画，最好是精美一点的）

以上的控件在下寻找甚久未果，加上又是急用，实徨矣。
各位同道若有知其下载之地，还望不吝指教。
若手头上有现成之品，如能赠予(cczhlxu@163.net)，在下感激万分！
先谢过各位了。

image可以自己写一个，简单的超出你的想象，
首先继承一个image，（用delphi的控件向导做）
然后写上响应鼠标事件cm_mousemove(不一定，自己查一下也许是mouseover)
的函数，如果不会写，你可以找一个delphi控件本身有类似功能即
会响应鼠标移动作出改变的如speedbutton有一个flat属性是决定按钮的浮动效果的，
就要响应鼠标移动事件，你可以自己看看它的vcl源码，照原样写一遍就可以了。
真的很简单，你说的这个东西我曾经做过，我甚至不屑于保存源码，因为实在太简单了。

鼠标离开时应响应cm_mouseleave消息。

1、GRID控件
恐怕难找，据我所知目前没有。

2、IMAGE控件
自己做一个控件，如下，在mouseleave事件中调用另外一个image就可以了。

unit kImage;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;

type
TkImage = class(TImage)
private FOnMouseLeave: TNotifyEvent;
procedure WZMouseLeave(var Msg:TMessage); message CM_MOUSELEAVE;


{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
published
property OnMouseLeave: TNotifyEvent read FOnMouseLeave write FOnMouseLeave;
{ Published declarations }
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('kvcl', [TkImage]);
end;

procedure Tkimage.WZMouseLeave(var Msg: TMessage);
begin
inherited;
if csLButtonDown in ControlState then
begin
Self.MouseUp(mbLeft,[ssLeft],0,0);
end;
if Assigned (FonMouseLeave) then FOnMouseLeave(Self);
end;
end.


end.



3、flash控件

只要安装了flash软件，他就带了一个OCX控件，安装这个空间就可以使用了。

1、DbGridEh基本能实现你功能，但排序要自己补一些代码，也很简单
其他的楼上都有了，我不再重复

1. InfoPower2000里有一个的wwDBGrid控件应该可以，不过可能需要一定的修改。
点击标题实现排列，如果是数据库的话就比较好办，如果不是那就比较麻烦了。
不过你不要用DBGrid这类的数据感应控件恐怕就比较难找了，还是自己写一个吧。
2. 你说的那个控件我以前写过两个个，一个是TEhImage，完成的功能就是你描述的。
另外一个是TImageButton，除了有TEhImage的功能外，就是可以当Button使用（可能
这就是你需要的），如果你需要可以发给你。
3. 如kai说的，安装ActiveX控件吧。

to softdog :
谢谢你啊！请发到我的cczhlxu@163.net

不胜感激！！

第2、3个问题已经解决了，多谢大家指点
第1个问题还没搞定，有人能帮我吗？

TopGrid和dxTreeList各能完成一个功能
可惜无法合并在一起
还有，有人能为我找到一个类似六合彩摇珠的flash动画吗？

萧大侠，邮件已经发出，请查收

Advstringgrid 看看这个控件怎么样！！
ftp://soft:soft@ftp.51delphi.com/astrgrid194.rar

多人接受答案了。