Главная страница
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.032 c
14-51515
pasha_golub
2003-09-26 16:54
2003.10.16
Аналог GetTickCount во FreePascal


14-51461
Igorek
2003-09-27 23:59
2003.10.16
Дежурство в чате


3-51103
lopatkin
2003-09-26 17:21
2003.10.16
В Delphi 7 - Either BOF or EOF is True, or the current... почему?


14-51483
Дремучий
2003-09-26 22:34
2003.10.16
Клиент форума.... но не для мастаков....


14-51520
SergP
2003-09-27 07:19
2003.10.16
TIdMappedPortTcp. Как с ним работать?