求救(50分)

D

dengpangzi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #1

procedure TForm1.Button1Click(Sender: TObject);
begin
with query1 do
begin
close;
sql.clear;
sql.add('update kaohe set bbsm='''+dbedit7.text+''' where name="高梁"');
execsql;
end;
end;
其中dbedit7是一个文本框，为整形，为何当我单击时，文本框的内容立即被清零，清零以前的内容也未被更新到数据库中，
请问为什么？

 

A

afeisky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #2

当然了,你用了TDBEdit啊,改为TEdit就可以了.
DBEdit连住Query1,当Query1执行时就会把DBEdit7的数值改变.

 

任

任我行_zq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #3

可能是你的DBEDIT7.DATASOURCE.DATASET是QUERY1，所以当
QUERY1执行CLOSE语句时，DBEDIT7清空。
正确的做法是DBEDIT7.DATASOURCE.DATASET设置为QUERY2,然后
用query1执行sql语句。

 

L

lyywy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #4

不要关数据库

procedure TForm1.Button1Click(Sender: TObject);
begin
with query1 do
begin
close; //这句话不要
sql.clear;
sql.add('update kaohe set bbsm='''+dbedit7.text+''' where name="高梁"');
execsql;
end;
end;

 

A

afeisky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #5

Query1.Execsql执行后,表中数据改变,DBEdit7的值就改变.