Форум: "Базы";
Поиск по всему сайту: 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.031 c
4-94623           Vulsim                2002-02-24 08:09  2002.04.29  
WinAPI/VCL


4-94608           Королев               2002-02-14 11:24  2002.04.29  
при импортировании функций из DLL с помощью Tdump ...


3-94290           Logic                 2002-04-08 15:50  2002.04.29  
Перенос данных из MS SQL в MS Access


3-94277           DANCHA                2002-04-06 09:57  2002.04.29  
Компонент TADOTable и глюки в работе с ним


1-94370           Gamar                 2002-04-17 12:15  2002.04.29  
Локализация проектов