Форум: "Базы";
Поиск по всему сайту: 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.72 MB
Время: 0.021 c
1-94398           inko                  2002-04-17 18:30  2002.04.29  
Выполнение приложения в командной строке...


1-94442           lipskiy               2002-04-05 21:43  2002.04.29  
Как описать входной параметр процедуры многовариантно?


4-94614           ebeden                2002-02-23 01:51  2002.04.29  
Перехват нажатий клавиш


1-94453           Deadlock              2002-04-16 07:25  2002.04.29  
Функция Format


3-94289           IronHawk              2002-04-05 10:31  2002.04.29  
Приветствую Мастеров ! Как из обыкновенного Edit-a сунуть ...