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

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
14-61314
Avenger__
2002-08-23 21:03
2002.09.19
Русификатор Delphi 5


1-61039
Ionv
2002-09-09 08:52
2002.09.19
Проблема при работе с портами


6-61232
alexru
2002-07-16 15:02
2002.09.19
Помогите сделать продвинутый Веб броузер !


14-61295
Cr@sh
2002-08-23 10:38
2002.09.19
Подскажите, где найти справочник.


3-61020
Bishop
2002-08-29 11:34
2002.09.19
sql