如何响应动态创建的stringgrid的ondrawcell等事件啊??? ( 积分: 5 )

  • 主题发起人 主题发起人 龙之天涯
  • 开始时间 开始时间

龙之天涯

Unregistered / Unconfirmed
GUEST, unregistred user!
应该怎么写啊??
 
应该怎么写啊??
 
写一个过程。在动态创建迭件的时候。用stringgrid1.ondrawcell==过程名。设置
 
我并不是要执行自己的过程,就是想执行创建的那个stringgrid的ondrawcell事件啊
 
用发送消息的方法应该可以。
 
procedure MyDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
...
end;
...
var
StringGrid1:TStringGrid;
begin
StringGrid1:=TStringGrid.Create(self);
StringGrid1.Parent:=self;
StringGrid1.Show;
StringGrid1.OnDrawCell ;= MyDrawCell;
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部