关于dbgrid的,谢谢

jinjintalk 2003-10-16 08:11:22
if DBGrid1.Columns [DBGrid1.SelectedIndex].Field = Table1Senior then
..........
.............
运行时系统提示Table1Senior没有定义,为什么,请问Table1Senior是什么,Table1Senior是什么类型,可以换成别的吗?
...全文
56 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
jinjintalk 2003-10-20
  • 打赏
  • 举报
回复
如何让dbgrid的columns的任意一个fieldname的caption标题按照设计期一样大小,而不在变化
hmily1688 2003-10-17
  • 打赏
  • 举报
回复
你可以改成
procedure TPqsjFrm.DBGrid1ColEnter(Sender: TObject);
begin
if DBGrid1.Columns [DBGrid1.SelectedIndex].
FieldName = 'Table1Senior' then//估计tablesenior为一字段
DBCheckBox1.Visible := True
else
DBCheckBox1.Visible := False;
end;
jinjintalk 2003-10-17
  • 打赏
  • 举报
回复
这是我的源代码:
procedure TPqsjFrm.DBGrid1ColEnter(Sender: TObject);
begin
if DBGrid1.Columns [DBGrid1.SelectedIndex].
Field = Table1Senior then
DBCheckBox1.Visible := True
else
DBCheckBox1.Visible := False;
end;
milerzhang 2003-10-17
  • 打赏
  • 举报
回复
学习
angle097113 2003-10-16
  • 打赏
  • 举报
回复
不知你想完成什么功能
hmily1688 2003-10-16
  • 打赏
  • 举报
回复
不知你想完成什么功能,你的代码又有错误
pwzhu666 2003-10-16
  • 打赏
  • 举报
回复
up
frogshero 2003-10-16
  • 打赏
  • 举报
回复
Table1Senior 应该是TField吧

5,379

社区成员

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

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