Форум: "Базы";
Поиск по всему сайту: 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.02 c
3-94272           IronHawk              2002-04-03 10:40  2002.04.29  
Приветствую Мастеров ! Вот появился вопросик, как очистить ....


7-94602           Diana                 2002-01-30 21:32  2002.04.29  
Подскажите что я не так сделала....


6-94521           vajo                  2002-01-17 10:06  2002.04.29  
Права доступа к папкам.


1-94380           Александр Арсентьев   2002-04-17 09:52  2002.04.29  
глюки Делфи


1-94495           Sukhov                2002-04-16 16:43  2002.04.29  
Получение почты, а точнее приаттаченных файлов с помощью FastNet