没问题阿,
var
i: Integer;
Begin
For i := 0 To Self.DBGrid1.Fields.Count -1 Do
Begin
If i <> 2 Then
Self.DBGrid1.Fields[i].Visible = False;
End;
End;
var
i: Integer;
Begin
For i := 0 To Self.DBGrid1.Fields.Count -1 Do
Begin
If i <> 2 Then
Self.DBGrid1.Fields[i].Visible = False;
End;
End;
解决方案 »
- adoquery调用存储过程
- 一个很奇怪的问题
- 高分求:delphi中实现类似图钉特效的代码
- 怎么先查询出一个表中的最后一条记录,加1后再插入到该表中呢?
- MDI窗体前加了用于normal类的登录窗体后,再也不能创建子窗体了,是何道理?
- 我想实现指定某个应用程序来打开文件,怎么写?
- 初学请教各位:标题栏的形状如何改变??在线等!!
- 在delphi7.0组件板上找不到ServerSocket和ClinetSocket组件,怎样把这两个组件安装上去?
- 一个有关web service的问题
- 我的TPageProducer组件的定制标识符事件为什么不能触发呀???
- 请问ppt演示文稿在delphi中怎么使用啊?
- 操作员权限的问题
SLECT NO AS '编号',NAME AS '名称', AGE AS '年龄'
FROM TABLE
DBGRID,和DATASET控也不要设静态字段!所有标题在SQL语句里生成
如果只想显示一列,SELECT 后跟一个字段就行了!
以上格式可在MS SQL SERVER通过,若是其它数据库可根据其语法再简单修改就行了!