Всем приветик ! у меня трабл такой , мож поможете , вообщем хочу одним блоком SQL занести в две таблицы записи , используя компаненту IBSQL
IBSQL->SQL->Clear();
IBSQL->SQL->Add(AnsiString(" Begin " )) ;
IBSQL->SQL->Add(AnsiString("INSERT INTO tree (Parent , Name ) VALUES ( ") + ParentId + AnsiString(" , ' ") + ed_Name->Text + AnsiString(" ') ; ") ) ;
IBSQL->SQL->Add(AnsiString("INSERT INTO DIC_TP (PARENT_ID , Name_TP ) VALUES ( ") + ParentId + AnsiString(" , ' ") + ed_Name->Text + AnsiString(" ') ; ") ) ;
IBSQL->SQL->Add(AnsiString(" End ; " )) ;
IBSQL->ExecQuery();

При выполнении ругается и пишет Dinamic SQL Error ...Sql error Begin..
Не пойму в чем косяк, может неправилно я блок SQL строю ? Или
не таким методом пользоваться в этой компаненте..
Подскажите плиз !!!