我查看了一个表,然后向其中插入一条记录后,想刷新但就出错,
代码如下: if (Button1.Caption='显示') then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;
form1.Button1.Caption:='刷新';
end
else if (form1.Button1.Caption='刷新')//在数据插入后,名字改为‘刷新’
then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;//是这里出错,为什么
end;
end;
代码如下: if (Button1.Caption='显示') then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;
form1.Button1.Caption:='刷新';
end
else if (form1.Button1.Caption='刷新')//在数据插入后,名字改为‘刷新’
then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;//是这里出错,为什么
end;
end;
解决方案 »
- 如何过滤掉前后10%的分数,再求平均分
- 记得有句代码,写在任何事件里面,会使事件执行完毕再执行该事件里面我们写的代码。忘了!!!!
- 主从表问题 晕好几天了!
- 大家好:请教修改数据库记录的问题?
- 如何从一个Query中进一步搜索
- 获得操作系统的信息(98 or 2000)?
- 用人用过TWinXP控件吗?为什么ListView报错啊?其它都正常。及...
- *.xls应该用什么东西打开?
- Delphi中SQL查询问题
- 什么地方可以免费下载delphi5.0的书?
- 请问哪位大侠告诉我在哪个个地方可以免费下载delphi 6.0
- DBLookupComboBox中怎么去掉重复的值(用来显示表中某一个字段时!)
if (Button1.Caption='显示') then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;
form1.Button1.Caption:='刷新';
end
else if (form1.Button1.Caption='刷新')//在数据插入后,名字改为‘刷新’
then
begin
DataModule3.Query1.Active:=false;
DataModule3.Query1.Prepare();
DataModule3.Query1.Active:=true;//是这里出错,为什么
end;
// end;这个是不是多了?
我昨天有事老早就关了
SQL里的语句就是简单的查询语句
'select * from tool'
datamodule3.open;试试
我在插入数值的时候,已经把SQL语句改了,刷新的时候SQL语句只是执行插入语句,怪不得没有结果呢!
半天的时间才查出,郁闷!