Скачать: CL | DM;

Тип String в тип TMySet?   Найти похожие ветки 

← →
towik   (2005-06-01 16:51) [0]

А как наоборот тип String переделать в TMySet? Если понадобится взять элемент с Edit и внести в TMySet?

---

← →
Amoeba ©   (2005-06-01 17:00) [1]

> TMySet

И что это за тип такой интересный? Поведай непросвещенным.

---

← →
towik   (2005-06-01 17:01) [2]

Тип множество

---

← →
Kerk ©   (2005-06-01 17:05) [3]

TMySet = set of Char;
...
MySet: TMySet;
...
MySet := [];
for i := 1 to Length(s) do MySet := MySet + [s[i]];
 
оно?

---

← →
Digitman ©   (2005-06-01 17:07) [4]

> towik


задача строго обратная.

если для проверки вхождения эл-та в множество требовалось чтение соотв.бита, то для включения/исключения эл-та в/из множества требуется установка соотв.бита

---

← →
Kerk ©   (2005-06-01 17:08) [5]

Digitman ©   (01.06.05 17:07) [4]

Работа с множествами через эти самые биты не есть хорошо, имхо..

---

← →
towik   (2005-06-01 17:10) [6]

Я в этих делах еще новичек! Можно просто кусочек кода написать? Плиз!!!

---

← →
Kerk ©   (2005-06-01 17:12) [7]

towik   (01.06.05 17:10) [6]

a: DWORD;
...
for i := 1 to Length(s) do
 a := (a shl 1) + IntToStr(s[i]);

дальше сам :)

---

← →
towik   (2005-06-01 17:13) [8]

Спасибо!!!!

---

← →
evvcom ©   (2005-06-01 17:13) [9]

http://delphimaster.net/view/1-1117624739/

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c