Форум: "Основная";
Текущий архив: 2002.09.19;
Скачать: [xml.tar.bz2];
Вниз
Sets в файл... Найти похожие ветки
← →
^Sanya (2002-09-07 14:21) [0]Подскажите какие-нибудь общепринятые методы записи множеств в текстовый файл....
Делать для Set of [a,b,c,d,e] что-то вроде:
a=1
b=0
c=1
d=1
e=0
а потом проверять if-ами неинтересно....
Возможно, что-то типа
Set = 0110 было б повеселее, но придётся циклом пройтись при чтении....
Короче, есть что-нибудь общепринятое и более рациональное?
Заранее благодарен этому форуму за огромную помощь в решении многих проблем...
← →
Kopetr (2002-09-07 14:42) [1]Попробуй сохранять\читать Byte(S), S - твое множество.
← →
Юрий Федоров (2002-09-07 14:51) [2]Посмотри, как сделано RTTI, модуль TypInfo
← →
Poirot (2002-09-07 17:23) [3]Таки set of это типа 32 байта!!! каждый бит коего отвечает за соотв эламент!!!
Т.е. есть элемент, то 1 нет 0...
Это принцип...
Ну а дальше всё донельзя просто!!!!
← →
Poirot (2002-09-07 17:33) [4]
A=set of Char;
--------------
var Z:A;
S:TFileStream;
begin
Caption:=IntToStr(SizeOf(A));
Z:=["B", "C"];
S:=TFileStream.Create("c:\sed.dat", fmCreate);
S.WriteBuffer(Z, SizeOf(Z));
S.Free;
← →
McSimm (2002-09-08 12:11) [5]Поправка - set может иметь размер 1 байт или 32 байта.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.09.19;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c
