Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Содержание сайт... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Создание отчето... 64153
Модуль Forms 63862
ТЕХНОЛОГИИ ДОСТ... 60743
Пример работы с... 60702
Имитационное мо... 56266
Реклама
Сейчас на сайте
Гостей: 1
На сайте нет зарегистрированных пользователей

Пользователей: 13,080
новичок: setan
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

База данных - словарь терминов на Delphi + Пояснительная записка
Моделирование ЭВМ на GPSS (три класса заданий) + Пояснительная записка
База данных электронного документооборота на Delphi + бд Intebase

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
Элементы управления и их свойства



Как известно, панель может содержать кнопки и другие элементы управле-
ния, например, раскрывающиеся списки или пункты меню. Эти элементы в
свою очередь принадлежат самой панели и объединены в коллекцию
Controls. Посредством этой коллекции осуществляется доступ ко всем эле-
ментам управления выбранной панели. Коллекция Controls имеет несколько
свойств и один метод. Мы будем использовать свойства Count (количество
элементов коллекции) и Item(i:integer) (элементы коллекции, где i — индекс
кнопки), а также метод Add, позволяющий добавлять на панель новые эле-
менты.
Рассмотрим свойства и методы элемента управления (табл. 10.3).
Таблица 10.3. Свойства и методы элемента управления


Исследуем содержание панели и некоторые свойства элементов управления.
Если рассматривать меню, то его основное отличие от панели с кнопками
состоит в том, что элементом управления в составе меню может быть как
пункт меню, так и подменю со своими элементами управления и т. д.
Чтобы проанализировать свойства панели, используем свойства Count и
Item() коллекции Controls, а также свойства Caption и TooltipText. Загрузим
весь список кнопок и других элементов управления панели в объект ListBox
с помощью следующей процедуры.
Загрузка списка элементов управления панели
procedure T0KBottomDlg5.FormCreate(Sender: TObject);
var a_:integer;
eee_:string;
begin
MYCONTROLS:=0KBottomDlg4.CommandBars.Item[
OKBottomDlg4.ListBoxl.Itemlndex+l].CONTROLS;
for a_:=l to MYCONTROLS.Count do begin
eee_:=MYCONTROLS.Item[a_].Caption+'='+MYCONTROLS.Item[a_].TooltipText;
ListBoxl.Items.Add(eee_);
end;
MYCONTROL:=MYCONTROLS.Item[ 1 ] ;
end;



Результат выполнения процедуры представлен на рис. 10.10.
Как видно из рис. 10.10, переходя от одного элемента управления к друго-
му, мы можем получать и изменять их свойства. Для этого достаточно за-
грузить в переменную типа variant ссылку на элемент Item(), например, как
в следующем операторе:
MYCONTROL:=MYCONTROLS.Item[ListBoxl.Itemlndex+l];



Далее, работая со ссылкой, мы получаем доступ к различным свойствам
выбранного элемента управления. В качестве примера сделаем невидимой
выбранную кнопку, изменим ее надпись (свойство Caption) и запустим на
выполнение команду, связанную с данной кнопкой.

Рис. 10.10. Состав панели
Управление свойствами элемента управления

procedure TOKBottomDlg5.b_visibleClick(Sender: TObject);
begin
MYCONTROL.Visible:=b_visible.Checked;
end;
procedure TOKBottomDlg5.b_CaptionClick(Sender: TObject);
begin
MYCONTROL.Caption:='Новая кнопка';
end;
procedure TOKBottomDlg5.ButtonlClick(Sender: TObject);
begin
MYCONTROL.Execute;
end;


Опубликовал Kest September 27 2009 00:25:27 · 0 Комментариев · 4228 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
ICQ
Binary2XMLDemo (Р...
Программирование ...
Искусство програм...
Книга по Delphi (...
Введение в станда...
Прграммирование в...
Email
Дарахвелидзе П., ...
Calendar
IMtale
Клавиатурный трен...
Plasma
Импорт новостей ...
Размещение элемен...
Мод "проверочный ...
Программа "AutoRu...
Медиа комбайн
БД студентов
Win-Prolog 3.618

Топ загрузок
Приложение Клие... 100455
Delphi 7 Enterp... 86121
Converter AMR<-... 20071
GPSS World Stud... 12522
Borland C++Buil... 11608
Borland Delphi ... 8519
Turbo Pascal fo... 7035
Visual Studio 2... 4992
Калькулятор [Ис... 4744
FreeSMS v1.3.1 3539
Случайные статьи
Форма Employee - н...
ИСПОЛЬЗОВАНИЕ ОТСЕ...
Инструменты Visual...
Анализ посещаемост...
Unexpected end of ...
Как создать решени...
Условия коллектива
Protocol) 355IAS (...
Функции приведения
Старые открытки
Индивидуальные про...
Запрос продуктов д...
Инициализация объе...
WQTABLE (ВЗВЕШЕННА...
групповой политики...
Поскольку процесс ...
Сообщения Auto-Ne...
Определение размер...
Игры
Invalid typecast
Операторы ввода-вы...
Мониторинг состоян...
СС/РР и Web-ориент...
3.1. Программа обр...
Умножение
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?