怎么判断tadoquery已经被free了(50分)

绯

绯红之王

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #1

重复free adoquery程序会报错
怎么避免被重复free
即第二次free的话怎么进行判别

没有用的
if assigned(aquery1) then freeandnil(aquery1);
依然出现invaild poniter operation

 

F

fly_phoenix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #2

if assigned(adoquery) then
freeandnil(adoquery)

 

天

天国之时

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #3

那 free过query不是null形式
那是什么形式啊

 

G

gaobangsheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #4

if Adoquery <> Nil then
Adoquery.Free;

 

H

HapBegin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #5

if assigned(adoquery) then
freeandnil(adoquery)

 

李

李翔鹏

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-14

• #6

怕程序报错就加个TRY，肯定报不出错来，我经常这么处理不太确定的东西。

 

S

siaosa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-15

• #7

assigned

 

L

lixin0117

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-15

• #8

if assigned(adoquery) then
begin
Adoquery.Free;
Adoquery := nill
end;

 

X

xyzbox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-18

• #9

var
myADO:TADOQuery;
begin
myADO:=TADOQuery.Create(Form1);
FreeAndNil(myADO);
if Assigned(myADO) then
begin
FreeAndNil(myADO)
end;
end;
建议你将adoquery1动态创建，可以将其声明为全局变量。

 

绯

绯红之王

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-07-30

• #10

多人接受答案了。