送分给大虾

sdj 2001-04-09 09:41:00
我有个自绘的TMyStringGrid控件,想在鼠标点击某个cell时,在cells上动态生成
一个TEdit,但是总是提示control''没有父窗口?
代码如下:function TMyStringGrid.SelectCell(ACol, ARow: Longint): Boolean;
var
R1:TRect;
E1:TEdit;
begin
inherited SelectCell(ACol, ARow);
R1:=cellrect(ACol,ARow);
E1:=TEdit.Create(self);
E1.Left:=R1.Left;
E1.Top:=R1.Top;
E1.Width:=R1.Right-R1.Left;
E1.Height:=R1.Bottom-R1.Top;
E1.Visible:=true;
E1.SetFocus;
E1.Free;
end;
...全文
64 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
sdj 2001-04-10
  • 打赏
  • 举报
回复
我已经搞定了谢谢两位只是有些不同。
E1.parent:=self;
windindance 2001-04-09
  • 打赏
  • 举报
回复
楼上是对的。
Triumph 2001-04-09
  • 打赏
  • 举报
回复
不错,动态生成的控件需要指定父窗口,应该添加一句:
E1.Parent:=Form1;

这个属性的单词拼得好象不对(我忘了),你再查一下吧,开头几个还是对的。

5,930

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧