Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.09.08;
Скачать: [xml.tar.bz2];

Вниз

множества   Найти похожие ветки 

 
toropoff   (2012-12-24 14:43) [0]

myTT = (mt1, mt2, mt3);

myT1 set of myTT;
myT2 set of myTT;

..
заполняются множества
..

нужно узнать входит ли хотя бы один элемент из myT1 в myT2

для этого пытаюсь пробежаться по элементам myT1  и сравнить

for n:=0 to hight(myT1) do
myT1[n] in myT2

1.  как определить сколько элементов задано в переменной множества?
    ни hight ни length не подходят. как я понимаю нужно узнать сколько бит выставлено..
2.  как обратиться к элементу переменной множества? на myT1[n] матюкается..


 
Юрий Зотов ©   (2012-12-24 14:50) [1]

Все проще - нужно проверить, является пересечение множеств пустым множеством:

if (myT1 * myT2) <> [] then
 множества_myT1_и_myT2_имеют_по_крайней_мере_один_общий_элемент

И не нужны никакие циклы.


 
MBo ©   (2012-12-24 14:52) [2]

myT1 * myT2


 
toropoff   (2012-12-24 14:54) [3]

спасибо!


 
Anatoly Podgoretsky ©   (2012-12-24 19:58) [4]

F1 + Set operators


 
MBo ©   (2012-12-25 08:44) [5]

>Anatoly Podgoretsky
Увы, в штатной справке новых версий это хрен найдешь
В онлайн - можно, но с хорошим пониманием того, что именно ищешь ;)
(в разделе Expressions)


 
Ega23 ©   (2012-12-25 09:43) [6]


> Увы, в штатной справке новых версий это хрен найдешь

Угу. Сволочи.


 
Anatoly Podgoretsky ©   (2012-12-25 13:34) [7]

> MBo  (25.12.2012 08:44:05)  [5]

Ерунда, пару секунд всего и фраза SET OPERATORS + Delphi, первая и четвертая
ссылки
(http://docwiki.embarcadero.com/RADStudio/XE3/en/Expressions_(Delphi))


 
MBo ©   (2012-12-25 14:47) [8]

>Anatoly Podgoretsky ©   (25.12.12 13:34) [7]
Эт я видел и нашел быстро, в онлайн-справке гуглопоиск неплохую релевантность даёт. А вот в офлайновой на слово set вообще ничего по делу не найти, только через Data Types - Structured types - Sets  - Expressions. Непростая логика для начинающего...


 
Ega23 ©   (2012-12-25 15:34) [9]


> Ерунда, пару секунд всего и фраза SET OPERATORS + Delphi,
>  первая и четвертая ссылки

Это большинству завсегдатаев ДМ ерунда. А вот начинающему - лютая амба.


 
Anatoly Podgoretsky ©   (2012-12-25 22:44) [10]

Естественный отбор, вопрос и амба


 
Германн ©   (2012-12-26 01:48) [11]


> MBo ©   (25.12.12 08:44) [5]
>
> >Anatoly Podgoretsky
> Увы, в штатной справке новых версий это хрен найдешь

Ещё в Д2007 это легко находится. Хотя там к справке уже очень большие претензии по сравнению со справкой в Д7 и ниже. Неужто после переезда из коджира в эмбаркадеро стало ещё хуже?


 
MBo ©   (2012-12-26 05:24) [12]

>Неужто после переезда из коджира в эмбаркадеро стало ещё хуже?
В среднем хуже не стало, что-то улучшилось (например, начали появляться описания типов событий, которые пропадали полностью, правда, только на C++), что-то ухудшилось - например, навигация по хелпу - верхний уровень загроможден, но при этом базовые вещи слеплены вместе в большие топики.


 
Anatoly Podgoretsky ©   (2012-12-26 14:20) [13]


> > >Anatoly Podgoretsky
> > Увы, в штатной справке новых версий это хрен найдешь
>
> Ещё в Д2007 это легко находится. Хотя там к справке уже
> очень большие претензии по сравнению со справкой в Д7 и
> ниже. Неужто после переезда из коджира в эмбаркадеро стало
> ещё хуже?

Вообще то это Ega23
но я согласен по некоторым позициям


 
Игорь Шевченко ©   (2012-12-26 21:57) [14]

Настоящий программист справку не читает, а остальным незачем жить :)


 
Германн ©   (2012-12-27 02:30) [15]

Удалено модератором



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

Форум: "Начинающим";
Текущий архив: 2013.09.08;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.002 c
15-1364654871
TUser
2013-03-30 18:47
2013.09.08
Умер Леонид Мацих


15-1364966140
O'ShinW
2013-04-03 09:15
2013.09.08
прехват запросов ODBC к БД (oracle)


2-1355904973
sqler
2012-12-19 12:16
2013.09.08
выборка


15-1365095139
Аббат Пиккола
2013-04-04 21:05
2013.09.08
Введение единого обязательного языка программирования


1-1312275277
Человек
2011-08-02 12:54
2013.09.08
Динамическое изменение TrayIcon.Icon





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский