Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.04;
Скачать: CL | DM;

Вниз

Проблемы с File of TMyType   Найти похожие ветки 

 
greenrul ©   (2003-11-26 03:31) [0]

Компилятор отказывается понимать File of TMyType, если TMyType - запись, в которой учавствует TStringList. Оно и понятно - сколько строк может быть в StringList и сколько памяти под него отводить - компилятор не знает

Проблема в том, что большая часть кода основана именно на взаимодействии с TStrings и менять их на другие не хочу.

Есть ли способы сохранить перменную типа TProject?

type TProject=record
title:TStrings;
fullpath:TStrings;
tip:TStrings;
Directory,SaveTo:string;
maxdeep:integer;
deep:TStrings;
IconIndex:TStrings;
Count:integer;
end;


p.s. - есть способ под названием "ручками" - когда в какой-нибудь ini файл все это ретранслируется, но он очень муторный. Есть еще способы?


 
ЮЮ ©   (2003-11-26 03:46) [1]

>сколько памяти под него отводить - компилятор не знает

Знает - 4 байта, как и под string в твоей рекорд.
Заметь, что SizeOf(TProject) = 36. Реально в 36 байтов запихать всё, что ты полагал? То-то !


 
Мыш ©   (2003-11-26 03:48) [2]

Я бы написал процедуры сохранения/загрузки конкретно для этого типа - времени много не заняло бы. А если бы было совсем неохота и "красота" решения не играет роли - то выход в том, чтобы хранить в отдельном поле fillpathFileName адрес текстового файлика со строками из fullpath. Подгружать его при выделении памяти для каждой новой записи.


 
greenrul ©   (2003-11-26 03:50) [3]

Дык а... можно код?


 
Мыш ©   (2003-11-26 03:50) [4]

Удалено модератором


 
Мыш ©   (2003-11-26 03:54) [5]

Никакого кода тебе не дадут, потому что File оf работает только для записей с определенными длинами полей.



Страницы: 1 вся ветка

Текущий архив: 2003.12.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
6-11672
Igorek
2003-10-07 16:16
2003.12.04
Возможные значения X-Cache и X-Cache-Lookup


8-11632
LevAlexander
2003-08-04 11:28
2003.12.04
MediaPlayer


6-11655
Yrtimd
2003-10-09 02:43
2003.12.04
Терминатор Интернет-соединения


1-11606
Seldon
2003-11-25 17:19
2003.12.04
TCheckListBox и lbVirtual


4-11736
mOOx_
2003-10-06 19:16
2003.12.04
Как я могу нарисовать рамку выделения