опять у меня с mysql не клеится

[hinst]

Опять у меня какие-то непонятные глюки с mysql.
Приложение глючит на финализации, которую я написал в соответствии со своими лучшими представлениями о финализации

Код: Выделить всё

   
  writeLN('1');
  query.Free;
  writeLN('2');
  transaction.Active:=false;
  writeLN('A');
  transaction.Free;
  writeLN('3');
  connection.Free;
  Write('.');      
  // ГДЕ
  // connection: TMySQL50Connection;
  // transaction: TSQLTransaction;
  // query: TSQLQuery;

Вылазит:
1
2
A
TApplication.HandleException Operation cannot be performed on an active transaction.
то есть, на строчке transaction.Free, следующей сразу после вывода буквы А и после transaction.Active:=false;
То есть, оно жалуется, что операция не может быть произведена над активной транзакцией, хотя, непосредственно перед этим я делаю транзакцию неактивной. Что за фигня? ХЭЛП ПЛЗ

[Vadim]

hinst
А Вы попробуйте делать предварительно transaction.Commit.

[hinst]

Vadim
О, чудо! Так заработало.

Код: Выделить всё

  writeLN('Deallocating query...');
  query.Free;
  writeLN('Commiting...');
  transaction.Commit;
  WriteLN('Deactivation...');
  transaction.Active:=false;
  writeLN('Deallocating transaction...');
  transaction.Free;
  writeLN('Deallocating connection...');
  connection.Free;
  Write('Finalized.');

Причём, я помню, что пробовал менять местами все эти действия, в том числе, и Commit, но тогда у меня так и не заработало... Видимо, не в том порядке было. RESPECT