[Serval]

проблемку решил - подсказали как исползовать букмарки и локейты.
кому интересено вот код предоставленный soleil@mmc

Код:

var
  MyBookMark: TBookmark;
begin
   MyBookMark:= Form2.Query3.GetBookmark;
   ....
    Query1.Active := false;
  Query1.SQL.clear;
  Query1.SQL.add('update place set ....');
  Query1.ExecSQL;
   ....   
   Form2.Query3.DisableControls;
   Form2.Query3.Active:=false;
   Form2.Query3.Active:=true;
   Form2.Query3.GotoBookmark(MyBookMark);
   Form2.Query3.EnableControls;
   Form2.Query3.FreeBookMark(MyBookMark);
end;

Код:

var
    l_pk_value: integer;

begin
   l_pk_value::= Form2.Query3.FieldByName('your_pk_field_name').AsInteger;
   ....
    Query1.Active := false;
  Query1.SQL.clear;
  Query1.SQL.add('update place set ....');
  Query1.ExecSQL;
   ....   
   Form2.Query3.DisableControls;
   Form2.Query3.Active:=false;
   Form2.Query3.Active:=true;
   Form2.Query3.Locate('your_pk_field_name', l_pk_value, []);
   Form2.Query3.EnableControls;
end;

поначалу просто непонял что искать...