![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как запустить процедуру в Interbase с помошью Делфи [D7, IB6.x]
Danilas © (2004-01-02 20:11:00)
Как запустить процедуру в Interbase с помошью Делфи
Danilas (2004-01-02 20:31:00) [1]
Jack128 © Спасибочки
Jack128 (2004-01-02 20:25:00) [2]
ibquery1.SQL.Text := "execute my_cool_proc(:my_cool_param)";
ibquery1.ParamByName("my_cool_param").AsInteger := 10;
if not ibquery1.Transaction.InTransaction then
ibquery1.Transaction.StartTransaction;
try
ibQuery.ExecQuery;
ibquery1.Transaction.Commit;
except
ibquery1.Transaction.Rollback;
raise Exception.Create("Ацтой какой то.. :-(");
end;
можно также испльзовать компонент TIbStoreProc..