Главная страница
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.018 c
1-51183
Andrey V.
2003-10-06 14:42
2003.10.16
Два проекта в одной папке


9-51057
D@V!D
2003-04-10 15:43
2003.10.16
DelphiX для Delphi6


3-51095
Phenest
2003-09-25 17:03
2003.10.16
Проблема с Btrieve


3-51075
Scald
2003-09-24 08:42
2003.10.16
TreeView и базы данных


1-51317
Abrams
2003-10-06 10:08
2003.10.16
TDateTimePicker