刚学数据库,想编一个小程序,
希望达到这个目的:用了一个edit,在其内输入一个数据库的相应编号,然后单击button1,在dbgrid1显示相应的纪录,我用了query
procedure TForm1.Button1Click(Sender: TObject);
begin
query1.SQL.Clear;
query1.SQL.Add('select * from 表1 where 编号=:s') ;
query1.Prepare;
query1.ParamByName('s').AsInteger:=strtoint(edit1.Text);
query1.ExecSQL;
end;但是却不行,单击后,想要的纪录出不来
也许我的概念认识的有问题,还望大家帮帮我,在线等待,再次道谢了
希望达到这个目的:用了一个edit,在其内输入一个数据库的相应编号,然后单击button1,在dbgrid1显示相应的纪录,我用了query
procedure TForm1.Button1Click(Sender: TObject);
begin
query1.SQL.Clear;
query1.SQL.Add('select * from 表1 where 编号=:s') ;
query1.Prepare;
query1.ParamByName('s').AsInteger:=strtoint(edit1.Text);
query1.ExecSQL;
end;但是却不行,单击后,想要的纪录出不来
也许我的概念认识的有问题,还望大家帮帮我,在线等待,再次道谢了
解决方案 »
- 关于数据存取的问题?请大家帮帮忙!
- TWordApplication组件问题
- 定义数组常量,且数组是记录类型,如何定义?
- 请教问题关于组件的????????????
- 做个项目,请高人指点!!急
- 江湖救急,一个关于调用DLL的问题???????
- 注册表中屏蔽右建菜单中‘复制’和‘粘贴’两项功能是什么键值?
- 存储数据的,使用三个TMEMO或TRICHEDIT,当有多行数据时都会出现“将截断字符串或二进制数据”的错误提示
- 我的连接字符串是Provider=Microsoft.Jet.OLEDB.4.0;Data Source=职称评审.mdb;Persist Security Info=False,哪位高人能在这个连接字符
- 一个小算法问题
- 各位高手你们来看一下,帮我一个问题,再先等待!
- 关于PARODX7.0数据库MMENY字段如何设置小数点后4位?
procedure TForm1.Button1Click(Sender: TObject);
begin
query1.SQL.Clear;
query1.SQL.Add('select * from 表1 where 编号=:s') ;
query1.Prepare;
query1.ParamByName('s').AsInteger:=strtoint(edit1.Text);
query1.Open;
end;
是不带回显结果的操作
>>query1.Open;
是带回显结果的操作
执行不返回结果集的语句用execsql,如update
execSQL用于不返回结果集的操作(insert,delete...)
是不带回显结果的操作
query1.Open;
是带回显结果的操作
SQL语句中没有select的。一般用TDataSet。ExecSQL;
SQL语句中没有select的。一般用TDataSet。ExecSQL;
query1.Close;
然后才
Query1.Sql.Clear;
......
而对表查看后用open
但用查询时注意光标的问题一般是
Query.First;
with Query do
close;
SQl.Clear;
SQl.add('');
Open;
end;
begin
query1.Close;//add!
query1.SQL.Clear;
query1.SQL.Add('select * from 表1 where 编号=:s') ;
query1.Prepare;
query1.ParamByName('s').AsInteger:=strtoint(edit1.Text);
query1.Open;//modified!
end;
我补充一下
如果频繁读一张表。
在每次打开以后可以用FETCHALL方法可能防止表死锁!