关于事件的响应

mygodsos 2002-07-31 05:09:05
1、d6中我要响应form的size的变化,使得控件dbgrid1的尺寸也变化,如何响应?
2、我写一个form上面有一个dbgrid,能不能给dbgrid加个autosize的属性?我只有
这样写
type Tmyform=class(Tform)
dbgrid1:DBgrid;
public
constructor Create(Owner:TComponent);override;
......

imm.....
constructor TmyForm.Create(Owner:TComponent);
begin
inherited create(owner);
dbgrid1.width:=width-8;
dbgrid1.height:=height-48;
end;

痛苦!!!而且不会随着myform变化而变化。
...全文
91 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
ehom 2002-07-31
  • 打赏
  • 举报
回复
写Create中一样的代码
dbgrid1.width:=width-8;
dbgrid1.height:=height-48;
mygodsos 2002-07-31
  • 打赏
  • 举报
回复
响应的代码如何写?
procedure onresize
不行
Billy_Chen28 2002-07-31
  • 打赏
  • 举报
回复
放几个panel,再把DBGRID放在其中一个里,属性设为alclient
界面你可以自己调一下
dreamfan 2002-07-31
  • 打赏
  • 举报
回复
方法有很多,
ddvboy 2002-07-31
  • 打赏
  • 举报
回复
up
ken_henderson 2002-07-31
  • 打赏
  • 举报
回复
应该在Form的OnResize事件中处理
qiujsh 2002-07-31
  • 打赏
  • 举报
回复
设置dbgrid的align属性为alclient或其它.
luckchen 2002-07-31
  • 打赏
  • 举报
回复
在OnReSize事件中处理
AIHUA 2002-07-31
  • 打赏
  • 举报
回复
2。如果你的dbgrid1 靠边的话 可以使用align属性
如果需要这样的效果的话
DBGrid1.Width := Width - 8;
DBGrid1.Height := Height -48;

你可以用Panel填充一下旁边的48嘛

明白否~

stick77 2002-07-31
  • 打赏
  • 举报
回复
OnReSize
drc 2002-07-31
  • 打赏
  • 举报
回复
设置DBGRID的Amchors属性即可!

================================================================

我越来越喜欢DELPHI了!

================================================================
AIHUA 2002-07-31
  • 打赏
  • 举报
回复
1.onPaint
没有窗体大小改变 就可以触发
票票飞扬 2002-07-31
  • 打赏
  • 举报
回复
Form的OnResize事件。
procedure TForm1.FormResize(Sender: TObject);
begin
DBGrid1.Width := Width - 8;
DBGrid1.Height := Height -48;
end;

5,388

社区成员

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

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