Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.16;
Скачать: CL | DM;

Вниз

Как сохранить всё содержимое ListView , а на Си билдере еси можно   Найти похожие ветки 

 
Alexsey Orlov ©   (2003-10-05 16:45) [0]

Как сохранить всё содержимое ListView , а потом загрузить на Си билдере еси можно


 
xGhost ©   (2003-10-06 08:04) [1]

//Сохранение
var
Writer : TWriter;
FileStream : TFileStream;
begin
if SaveDlg.Execute then begin
FileStream:=TFileStream.Create(SaveDlg.FileName,fmOpenWrite or fmCreate);
Writer := TWriter.Create(FileStream, SizeOf(ListView1));
Writer.WriteRootComponent(ListView1);
Writer.Free;
FileStream.Free;
end;
// Чтение
var
reader : TReader;
FileStream : TFileStream;
begin
if OpenDlg.Execute then begin
FileStream:=TFileStream.Create(OpenDlg.FileName,fmOpenread);
Reader := TReader.Create(FileStream, SizeOf(ListView1));
Reader.ReadRootComponent(ListView1);
Reader.Free;
FileStream.Free;
end;

Удачи !



Страницы: 1 вся ветка

Текущий архив: 2003.10.16;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.038 c
6-51361
TDIONIS
2003-08-21 22:30
2003.10.16
function InetIsOffline


14-51446
lokka
2003-09-29 20:51
2003.10.16
Аутсорсинг!


1-51230
Val
2003-10-03 14:55
2003.10.16
Error while setting a property in Automation object


6-51383
Dysan
2003-08-19 14:59
2003.10.16
Socket ERROR code = 10061


3-51067
Dark Elf
2003-09-26 12:36
2003.10.16
DBGrid