since i needed to refresh the data every once in a
blink, and i needed to locate the record ....

now.. what i finally did

var 
  bm: TBookmark;
begin
  Screen.Cursor := crHourGlass;

  // disconnect the grids from the datasource
  // it refetches the records when connected
  DataSource1.DataSet := nil;

  ADOTable1.DisableControls;
  ADOTable1.Filter := 'whatever filter goes';
  ADOTable1.Filtered := true;
  ADOTAble1.Active := true; 
  bm := ADOTable1.GetBookmark;
  ADOTable1.Filtered := false;
  DataSource1.DataSet := ADOTable1;
  ADOTable1.GotoBookmark(bm);
  ADOTable1.FreeBookmark(bm);
  ADOTable1.EnableControls;
  Screen.Cursor := crDefault; 
end;


demi-crappy but its 3.23 am and im just sputtering..
and it seems to work...

__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"

Reply via email to