TDBResult.asBlob

Модуль: DbConn
Класс: TDBResult

возвращает указатель на данные поля, размер которых записывается в nSize

Объявление

function asBlob(nField: integer; var aData: PChar): integer;

Описание

Пример

function LoadBlodFieldDataToStream(ADbRes: TDBResult; AFieldIndex: Integer; AStream: TStream): Boolean;
  S: Integer;
  P: PChar;
begin
  Result:= Assigned(ADbRes) and Assigned(AStream) and AFieldIndex < (AFieldIndex =< ADbRes.numFields);

  if Result then
    S:= ADbRes.asBlob(AFieldIndex,P);

  AStream.WriteBuffer(P,S);

  Result:= AStream.Size > 0;
end;