Вниз
Скачать: 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.041 c
14-1117347749
NikNet
2005-05-29 10:22
2005.06.29
Делаю Joiner вот проблемма вытащить код из программы


1-1118313487
Tria
2005-06-09 14:38
2005.06.29
Как узнать параметры принтера без BeginDoc


10-1094486888
vadim
2004-09-06 20:08
2005.06.29
Автоматизация MSOffice


10-1094808266
Шнур
2004-09-10 13:24
2005.06.29
WordOLE


14-1117602690
Vlad Oshin
2005-06-01 09:11
2005.06.29
Извините за вчерашнее.




   Наверх