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

Вниз

Классы   Найти похожие ветки 

 
volkafff ©   (2011-05-16 21:51) [0]

Здравствуйте уважаемые программисты! Очень прошу ответить на мои вопросы,а не посылать читать книги.)))

1)На экране есть панель. На ней компоненты.Пользователь кликает по нескольким из них и они "перелетают" в центр экрана. Компонентов в центре может быть очень много, классов-шесть. Мне нужно написать чтото-такое:
"Если среди компонентов(только тех,которые в центре),есть компонент класса Х и компонент класса У, тогда сделать ..."

2)Все компоненты в центре должны как-то получить идентификаторы,чтобы я мог сравнивать свойства так:
"компонент А1.свойство прозрачность:=компонент А2.свойство прозрачность + компонент ВВ5.свойство прозрачность..." Напомню,компонентов может быть много,даже слишком)))

Очень хотелось бы получить ответы на вопросы,советы и рекомендации.
Заранее спасибо!


 
Jeer ©   (2011-05-16 23:40) [1]

Заранее пожалуйста.


 
Virgo_Style ©   (2011-05-16 23:42) [2]

is, Components, ComponentCount


 
Ega23 ©   (2011-05-16 23:46) [3]


>  должны как-то получить идентификаторы


У компонента есть свойство Tag.
У контрола есть свойство Contols и ControlCount
В справке есть справка по этим вопросам.


> "Если среди компонентов(только тех,которые в центре),есть
> компонент класса Х и компонент класса У

var
 b: byte;
 i: Integer;
begin
 b := 0;
 for i := 0 to СписокКомпонентовКоторыеВЦентре.Count - 1 do
 begin
   if СписокКомпонентовКоторыеВЦентре[i] is КомпонентКлассаХ then
     b := b or 1
  else
  if СписокКомпонентовКоторыеВЦентре[i] is КомпонентКлассаY then
     b := b or 2;
 end;
 if b = 3 then
   ВСпискеКомпонентовКоторыеВЦентреПрисутствуютКомпонентКлассаХИКомпонентКлассаY
end;


 
Германн ©   (2011-05-17 02:20) [4]


> Virgo_Style ©   (16.05.11 23:42) [2]


> Ega23 ©   (16.05.11 23:46) [3]
>
>

Controls, not Components!
Это я о переборе в списке. Список компонентов может быть пустым, но список контролов пустым быть не может, если контрол виден и по нему можно кликнуть мышкой.


 
Ega23 ©   (2011-05-17 08:01) [5]


> Controls, not Components!
> Это я о переборе в списке. Список компонентов может быть
> пустым, но список контролов пустым быть не может, если контрол
> виден и по нему можно кликнуть мышкой.


Я специально писал СписокКомпонентовКоторыеВЦентре, т.к. я не в курсе, что имел автор ввиду: контролы или компоненты.


 
volkafff ©   (2011-05-17 16:22) [6]

компоненты,image


 
Ega23 ©   (2011-05-17 16:50) [7]


> компоненты,image

акваланги, Гагарин.


 
Anatoly Podgoretsky ©   (2011-05-17 19:11) [8]

Книги и читать.



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

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

Наверх





Память: 0.46 MB
Время: 0.003 c
15-1304800194
Юрий
2011-05-08 00:29
2011.08.28
С днем рождения ! 8 мая 2011 воскресенье


1-1264839776
kudatsky
2010-01-30 11:22
2011.08.28
Как скопировать слово из одного TMemo в другой ?


2-1305528128
ZV
2011-05-16 10:42
2011.08.28
Начинает напрягать Index out of bound (**)


1-1264840745
Igorishe
2010-01-30 11:39
2011.08.28
Изменить цвет Caption в TTabSheet


2-1305239422
Германн
2011-05-13 02:30
2011.08.28
Тип AniString





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский