Dmitri Kuzmenko wrote:
> Hello, freemanzav!
>
> freemanzav wrote:
>
> > К тому же IBBatch работает только с IBX, ну к
> > FIB его можно прикрутить, ведь работает
>
. В исходные тексты надо иногда
> заглядывать, не все ж компоненты на формы бросать :-)
Перед тем как использовать компонент в
реальных целях я всегда смотрю
исходники.
>
> > тому же в Delphi 5 в нем ошибка при работе с
>
> что такое Delphi 5 ? :-)
Среда разработки такая. И в его
поставку входит модуль IBSQL.pas
написанный
Gregory H. Deatz (шоб он был здоров). И тама
есть такой незамысловатый код:
function TIBOutputRawFile.WriteColumns: Boolean;
...
begin
...
for i := 0 to Columns.Count - 1 do
begin
WriteFile(FHandle, Columns[i].Data^.sqldata^,
Columns[i].Data^.sqllen,
BytesWritten, nil);
if BytesWritten <> DWORD(Columns[i].Data^.sqllen) then
exit;
end;
...
end;
Называица - найди две ошибки.