загрузка сохранения множества

← →
i (2008-07-24 15:29) [0]

есть ли какой хороший способ загрузки\сохранения множества (в строку или число)?
или только перебором делается?

← →
Медвежонок Пятачок © (2008-07-24 15:31) [1]

writebuff

← →
Leonid Troyanovsky © (2008-07-24 15:51) [2]

> i (24.07.08 15:29)

> есть ли какой хороший способ загрузки\сохранения множества
> (в строку или число)?

http://groups.google.com/group/fido7.ru.delphi/msg/eb29fb48626c9a5e

--
Regards, LVT.

← →
Медвежонок Пятачок © (2008-07-24 16:01) [3]

жуть какая.

← →
Медвежонок Пятачок © (2008-07-24 16:05) [4]

var s : set of char = [];
s1 : set of char = [];

procedure TForm1.Button1Click(Sender: TObject);
var str : string[32]; i : char;
begin
ZeroMemory(@str[1],32);
Include(s,"z");
Include(s,"x");
Include(s,"c");
Move(s,str[1],32);
Move(str[1],s1,32);
for i := "a" to "z" do if i in s1 then ShowMessage(i);
end;

← →
oldman © (2008-07-24 16:06) [5]

> или только перебором делается?

перебором чего?

← →
i (2008-07-24 18:24) [6]

> перебором чего?

if [value1] in Myset then Strs.add("value1");

а потом беру Strs.Text и всё.

но интересовал более универсальный метод. спасибо за ссылку выше. изучаю.

← →
Медвежонок Пятачок © (2008-07-24 18:41) [7]

зачем там потребовалось ртти в упор не въезжаю.
всего-то надо сохранить 32 байтное значение.

← →
Anatoly Podgoretsky © (2008-07-24 20:04) [8]

> Медвежонок Пятачок (24.07.2008 18:41:07) [7]

В большинстве случаев множество не превышает 32 бит, а это можно хранить как целое.

← →
i (2008-07-24 21:51) [9]

> В большинстве случаев множество не превышает 32 бит, а это
> можно хранить как целое.

а можно это сделать на перебирая\проверяя каждый элемент множества?

> i (24.07.2008 21:51:09) [9]

Можно, я же сказал как целое, по английски Integer

← →
i (2008-07-24 22:35) [11]

а, всё понял, получилось. спасибо.

> Медвежонок Пятачок © (24.07.08 18:41) [7]

> зачем там потребовалось ртти в упор не въезжаю.

Угадал все буквы, а слово - нет.

Зачем? Сохранять в строку.

--
Regards, LVT.

загрузка сохранения множества Найти похожие ветки