Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.10.16;
Скачать: [xml.tar.bz2];

Вниз

Как сохранить всё содержимое 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.01 c
6-51384
iWorm
2003-08-21 03:34
2003.10.16
Как передать c cокета TServerSocket на сокет TClientSocket


1-51262
real_dimedrol
2003-10-07 01:01
2003.10.16
Вопросы по MDI Application


3-51093
Светлана
2003-09-26 07:06
2003.10.16
Точки останова в триггерах и процедурах


1-51289
Denius
2003-09-29 17:55
2003.10.16
А как сделать прозрачность кусков визуфльных компонент?


8-51352
Strori
2003-05-21 10:58
2003.10.16
Ссылка в теле картинки





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский