Re[3]: AV in module gds32.dll

Tue, 03 Oct 2006 00:49:55 -0700 

Приветствую Вас,

Получилось даже на примере выдало ошибку могу выслать вест проект куда
скажете.

**********************************
  TIBDataSet *Query;
  TIBTransaction *Transaction;
  Query = new TIBDataSet(NULL);
  Transaction = new TIBTransaction(NULL);
  Transaction->Params->Clear();
  Transaction->Params->Add("read_committed");
  Transaction->Params->Add("rec_version");
  Transaction->Params->Add("nowait");
  Query->Transaction = Transaction;
  Query->Database = Connect;
  Transaction->DefaultDatabase = Connect;
  Query->ForcedRefresh = true;
  Transaction->DefaultAction = TACommitRetaining;
  Transaction->AutoStopAction = saCommitRetaining;
  try
  {
    Connect->Connected = true;
  }
  catch(...)
  {
    Connect->Params->Clear();
    Connect->DatabaseName = "D:\\Projects\\Test\\EmptyDB\\test.gbk";
    Connect->Params->Add("USER \"SYSDBA\"");
    Connect->Params->Add("PASSWORD \"masterkey\"");
    Connect->Params->Add("PAGE_SIZE 4096");
    Connect->CreateDatabase();
    Connect->Connected = false;
    Connect->Params->Clear();
    Connect->DatabaseName = "D:\\Projects\\Test\\EmptyDB\\test.gbk";
    Connect->Params->Add("user_name=SYSDBA");
    Connect->Params->Add("password=masterkey");
    Connect->Connected = true;
  }

  Query->SelectSQL->Text = "SELECT rdb$relation_name FROM rdb$relations";
  Query->Open();
  Connect->DropDatabase();
  Connect->DatabaseName = "D:\\Projects\\Test\\EmptyDB\\test.gbk";
  Connect->Params->Clear();
  Connect->Params->Add("USER \"SYSDBA\"");
  Connect->Params->Add("PASSWORD \"masterkey\"");
  Connect->Params->Add("PAGE_SIZE 4096");
  Connect->CreateDatabase();
  Connect->Connected = false;
**********************************

если Query->Open(); выпполнить тогда выдает АВ при Connect->Connected = false;
а если не выполнять Query->Open();, отсоединение проходит успешно.
Этот баг только на 2 на 1.5 такого нет.
-- 
С Уважением, Дмитрий Котельников

Ответить