말그대루 입니다
일단 저 같은 경우 디비에러를 여러번 내면 그런 메세지가 쓰더군요
게서 생각한건데..

데이터셋을 오픈만 하구 클로즈를 안하거나
여러번의 디비 에러가 있거나해서 데이터 셋을 똑바로 해제를 못시킬경우에
발생하는 걸로 알고 있습니다

일단 데이터 셋을 사용할때 열고 사용하지 않으면 반드시 닫아야 하구요
트랜젝션두 커밋이나 롤백을 반드시 해줘야 하는 걸로 알고 있습니다

안녕하세요
수고 많습니다.

위의 말을 정리해서 작업을 한다면 아래와 같이 되지않을까 생각합니다.

그럼 수고 하세요

procedure TFcusOrder.BtnSaveClick(Sender: TObject);//save 버튼
begin

try
Dm1.DataBase1.StartTransaction;


with Query1 do
  begin
  Close;
  Sql.Clear;
  Sql.Add('Insert into Corder  (BILL_NO,   SEQ,  COMP_CODE  ...   ');
  Sql.Add('  values ( :pBILL_NO, :pSEQ, :pCOMP_CODE ...            ');
                                          .
                                          .
                                          .
  ParamByNAme('pBILL_NO'        ).asstring  :=FlatEdit2.text;
  ParamByNAme('pSEQ'              ).asstring  :=formatfloat('000',Seq);
  ParamByNAme('pCOMP_CODE' ).asstring  :=FlatEdit1.text;

  Execsql;
  Close;
  end;


Dm1.DataBase1.Commit;

except
Dm1.DataBase1.RollBack;
Application.MessageBox(PChar('Data Save Failure...  Please Retry!!!'),
                                'Confirm',mb_Ok+mb_iconwarning);
end;
end;