Форум: "Основная";
Поиск по всему сайту: 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.019 c
3-42658           Eraser                2002-01-21 10:04  2002.02.14  
Скоко можно записей в DB


1-42713           Kozhanov              2002-01-31 14:37  2002.02.14  
как сделать


1-42784           Eraser                2002-01-31 09:45  2002.02.14  
Формирование массива


6-42813           vinni2000             2001-11-23 11:52  2002.02.14  
Как соеденить клиента и сервера


6-42814           Русский               2001-11-20 20:44  2002.02.14  
Помогите.