> Как это нет возможности?
>
> With TIbSql.Create(Application) do begin
>     DataBase := Db;
>     Transaction := Tr;
>     SQL.Add('Select Field From Tbl Where Id = :Id');
>     Params[0].AsInteger := Id;
>     ExecQuery;
>     Var := Fields[0].AsInteger;
>     Free;
> end;
>
> With b/r. Gleb.
сколько строчек кода?
программа и сделана для того, чтобы
уменьшить кол-во всяких рутинных
операций. Чтобы не надо было увязывать
DataBase, DataSource и пр. Чтобы не нужно было
писАть такие конструкции...

Ответить