删除数据后，找不到：书签。(50分)

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-12

• #1

我用：Ehlib25，在作数据删除时，
结构大致如下：
var
saveplace: TBookmark;
begin
......(删除操作)
saveplace := DataModule1.ADOQuery1.GetBookmark;
Button_search.OnClick(Self);//重新查询,相当于Close再Open
DataModule1.ADOQuery1.GotoBookmark(saveplace);
DataModule1.ADOQuery1.FreeBookmark(saveplace);
end;
当，我删除一个数据集的最后一条记录时，会出错：找不到书签的错误。
请教，如何处理？谢谢/

 

B

bes96261

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-12

• #2

這是很正常的，詳細原因你可參看一下書簽的定義

pbookmark:=GetBookmark;
......
if Assigned(pbookmark) then
begin
GotoBookmark(pbookmark);
FreeBookmark(pbookmark);
end
這樣引用不容易出錯

 

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-12

• #3

有没有办法。在：这种情况下，移动下：书签？
比如：是最后，就，向前移，
是最前，就，向后移。
？如何，能这样？

 

G

gongshl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #4

这种错误可以不用理会，用try except 屏蔽掉就可以了

 

D

dragonlee007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #5

首先
getbookmark
then
.deltete
Button_search.OnClick(Self);//重新查询,相当于Close再Open
then
.gotobookmark

 

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #6

OK。看来，只有：用try except 屏蔽掉就可以了
谢谢。

 

H

heping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-14

• #7

多人接受答案了。