Показать сообщение отдельно
Старый 04.12.2009, 11:23   #1  
Tzap is offline
Tzap
Участник
 
70 / 10 (1) +
Регистрация: 14.03.2005
Добрый день. Подскажите как считанные из sql двоичные данные (картинка) через Nav записать в файл. Пробую примерно следующий код

ADORecords := ADOCommand.Execute;
ADOFields := ADORecords.Fields;
ADOField := ADOFields.Item('ImageData');
VarImage := ADOField.Value;

ImageFile.TEXTMODE(FALSE);
ImageFile.CREATE('с:\image.jpg');
ImageFile.WRITE(VarImage);

VarImage - переменная Variant, через Binary вообще получается
записать в файл не получается, возникает ошибка про типы данных. Как корректно произвести запись в файл? через потоки?