Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Вниз

Сохранение иерархической структуры. 


DenKop   (2002-01-30 23:17) [0]

Есть структура такого типа: Год.Месяц.День
Например: 2001.Март.23
Кол-во лет,месяцев и дней не определно,т.е. в одном году необязательно должно быть 12 месяцев, какие то месяца могут отсутствовать.Не подскажет ли кто алгоритм для сохранения такой структуры в файле.Заранее благодарен.



Фэ   (2002-01-30 23:37) [1]

2001
Январь
01
02
30
Февраль
28
Декабрь
15
16
2002

т.д

Структрура TTreeView
LoadFromFile
SaveToFile



Walker_sw   (2002-01-31 06:28) [2]

хм... попробуй так (если я правильно понял)

type
TMyString = String[12]; //12 символов тебе хватит под название любого месяца

type
MyStruct = record
year: Word;
Month: TMyString;
Day: Byte;
end;


если файл типизированный, например File Of MyStruct, то проблемы возникают, когда ты поля своей структуры объявляешь типом String, т.к. переменные этого типа не имеют заранее оговорённой длины.



DenKop   (2002-02-01 00:44) [3]

Идея Walker_sw интересная, попробую, а про сохранение структуры в TTreeView я в общем не подумал. Всем спасибо.

>>SoftOne я выразился вполне понятно, я думаю это вы меня не поняли, а не я задал непонятный вопрос.



Ura   (2002-02-01 12:09) [4]

А можно попробовать ini файл
[ год 1 + месяц 1 ]
число 1 = value 1
число 2 = value 2
[ год х + месяц х]
число 1 = value




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
1-42734           Alexxx                2002-01-29 15:19  2002.02.14  
Печать из дельфи документов в 866 кодировке с псевдографикой


3-42654           Do№                   2002-01-16 22:02  2002.02.14  
Как игнорировать ошибку при открытии БД


4-42896           _Dima                 2001-12-18 12:12  2002.02.14  
В Win98 работаю с COM портом - все OK, в Win2k та же прога глючит. Почему ?


1-42765           kingdom               2002-01-30 14:40  2002.02.14  
Нужен TShape нестандарной формы, как это сделать?


1-42711           Анатолий              2002-02-01 07:08  2002.02.14  
разрешение экрана