请问有没有什么数据控件可以动态的改变字段的多少?

jwt1982 2003-09-15 08:51:03
简单说就是:比方我输入4,那么字段就显示4个,9就显示9个!
控件可以,代码实现也可以!

我是做课程表,因为学校的上课天数不定,课节数不定,需要动态的改变字段数目和记录数,谢谢大家帮忙!
...全文
47 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
cdhuanglei 2003-09-15
  • 打赏
  • 举报
回复
控件: cxGrid

procedure TForm1.RzButton2Click(Sender: TObject);
var
i: integer;
begin
ods1.Close;
for i := cxGrid1DBTableView1.ColumnCount - 1 downto 0 do
cxGrid1DBTableView1.Columns[i].Destroy;
ods1.SQL.Clear;
ods1.SQL.Text := RzMemo1.Text;
ods1.ExecSQL;
ods1.Open;
for i := 0 to ods1.FieldCount - 1 do
cxGrid1DBTableView1.CreateColumn.DataBinding.FieldName := ods1.Fields[i].FieldName; //这里就是创显示字段
end;
WWWWA 2003-09-15
  • 打赏
  • 举报
回复
SQL语句+临时表

5,386

社区成员

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

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