自己通过程序会在sqlsever数据库中动态建表,希望用dbgrid显示建表内容,各表格式都是一样的,不知道怎么办哦,高人请指点
解决方案 »
- SendMessage WM_settext的问题
- Delphi关于通过日期来查询access数据库问题(解决立即结贴)
- delphi中怎么将pchar转换成string型的?
- 为什么单独打开一个 pas文件 会出错 这样的问题怎么解决呢?
- 关于ado的error??
- 想辞职,公司要交违约金,怎么办?
- 又是DBGrid的问题
- *******看图说话,抢分********
- 数值循环的算法问题
- 关于多用户操作同一个表的问题
- 用dephi语句取得sqlsever中某张表的某行的所有字段值,并赋值我所定义的变量的方法!!!!!!急啊,很急啊
- 绝对奇怪问题,请大家进来给我分析下,有关fastreport的安装,太怪
添加一个datasource1,其‘dataset’属性指向‘ADOQuery1’,
添加一个DBGrid1,其‘datasource’属性指向‘datasource1’
双击DBGrid1添加字段。
//ADOQuery1中查询并得到结果 :
with ADOQuery1,sql do
begin
close;
clear;
Add('查询代码');
open;
end;
//添加一个datasource1,其‘dataset’属性指向‘ADOQuery1’,
datasource1.dataset:=‘ADOQuery1’;
//添加一个DBGrid1,其‘datasource’属性指向‘datasource1’
DBGrid1.datasource:=‘datasource1’ ;
var
mingcheng,sqlstr:string;begin try
with ADOQuery1, sql do
begin
mingcheng:= Edit1.Text;
SQL.Clear;
sqlstr:='select * from 货表 where 名称='''+mingcheng+''' ';
open;
dataSource1.DataSet:=ADOQuery1;
DBGrid1.datasource:=datasource1;
ADoQuery1.Close;
end;
except
Application.MessageBox('err!', '提示信息', MB_OK+MB_ICONASTERISK+MB_DEFBUTTON1+MB_APPLMODAL);
end;
end;
这样写的,有问题,哪里错了不明白