김백일님 답변 감사합니다.
그런데 안되는군여 ...

  Application.MessageBox(PChar(Format(Msg02,['저장'])), '확인', MB_ICONINFORMATION+MB_OK);
finally
  IBT1.Active := False;  -->> 여기서 False 되면서 관련된 IBQuery가 같이 False되어 버립니다.
  QWrt1.Close;  --> 이런 문장이 필요없어지더군여...
end;


즐거운 연말되세여 ^^*