Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Вниз

Как считать с базы текст размером 1М. 


Zak   (2002-04-09 13:08) [0]

Сабж. Есть поля Мемо в которых находится тексты. И вот надо считать эти тексты и соответствено сохранить на диске в текстовом формате. В рич такие размеры не влезают, что делать?
Может есть такие компоненты? (бесплатно соответствено?:))
И еще...
Как сделать чтоб кода происходит SaveToFile с DBRichedit в файл формате txt он не записывал этот текст в формате rtf а в простом тхт?



Dok_3D   (2002-04-09 13:19) [1]

var BlobStream : TStream;
FileStream : TFileStream;
begin
FileStream:=TFileStream.Create(stFileName,fmCreate);
BlobStream:=Query.CreateBlobStream(Query.FieldByName ("MEMOFIELD"),bmRead);
FileStream.CopyFrom(BlobStream,0);
BlobStream.Free;
FileStream.Free;
end;

Набил прямо здесь, но, думаю, суть понятна ...



Lusha   (2002-04-09 13:21) [2]

>Dok_3D
А что TBlobField.SaveToFile не прокатит?



Dok_3D   (2002-04-09 20:01) [3]

2Lusha
Может и прокатит. Не пробовал. У меня вообще не было надобности из поля сразу в файл. Просто, человек спросил, я ответил.



Zak   (2002-04-10 06:52) [4]

Такс. значит и чтоб записать в таблу такие размера нужно также через Stream-ы
хм.. понятно большое спасибо :)




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Наверх







Память: 0.74 MB
Время: 0.024 c
3-94270           almikhb               2002-04-08 03:56  2002.04.29  
Печать стркутуры Базы Данных


1-94478           Марина                2002-04-16 08:37  2002.04.29  
Install Shield Express


3-94338           Zak                   2002-04-09 13:08  2002.04.29  
Как считать с базы текст размером 1М.


1-94469           Pit                   2002-04-09 11:10  2002.04.29  
Загрузка результата селекта в Excel


3-94265           cranium               2002-04-07 20:36  2002.04.29  
Список пользователей базы InterBase