Bug GotoBookMark with Filter
Posted: Fri 09 May 2014 03:25
Bug GotoBookMark with Filter
This code below does not work
But with the TClientDataSet works perfect
then believe to be a bug in IBDac 5.3.7
procedure TForm1.Button2Click(Sender: TObject);
begin
IBCQuery2.Filtered := False;
IBCQuery2.Filter := 'CODIGO = ''1000''';
IBCQuery2.Filtered := True;
end;
procedure TForm1.Button4Click(Sender: TObject);
Var vRegistro : TBookmark;
begin
vRegistro := IBCQuery2.GetBookmark;
IBCQuery2.Filtered := False;
IBCQuery2.Close;
IBCQuery2.Open;
// He can not find the record
if IBCQuery2.BookmarkValid(vRegistro) Then
IBCQuery2.GotoBookmark(vRegistro);
end;
This code below does not work
But with the TClientDataSet works perfect
then believe to be a bug in IBDac 5.3.7
procedure TForm1.Button2Click(Sender: TObject);
begin
IBCQuery2.Filtered := False;
IBCQuery2.Filter := 'CODIGO = ''1000''';
IBCQuery2.Filtered := True;
end;
procedure TForm1.Button4Click(Sender: TObject);
Var vRegistro : TBookmark;
begin
vRegistro := IBCQuery2.GetBookmark;
IBCQuery2.Filtered := False;
IBCQuery2.Close;
IBCQuery2.Open;
// He can not find the record
if IBCQuery2.BookmarkValid(vRegistro) Then
IBCQuery2.GotoBookmark(vRegistro);
end;