Навигация
Главная
Поиск
Форум
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
Создание отчето... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Модуль Forms 65535
Имитационное мо... 59260
Реклама
Сейчас на сайте
Гостей: 2
На сайте нет зарегистрированных пользователей

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

Моделирование процесса поступления заявок в систему, состоящую из трёх Э...
База данных электронного документооборота на Delphi + бд Intebase
Расчет мер близости на отношениях на Delphi + Пояснительная записка

Реклама



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

ПОДПИСЫВАЙСЯ на канал о программировании
Линия границы надписи



Линии границы объекта коллекции Shapes в общем и надписи (объекта
TextBox) в частности могут выглядеть по-разному и определяются свойства-

Рис. 8.9. Пример использования штриховки в качестве фона надписи
ми объекта Line, принадлежащего элементу коллекции Shapes. Граница объ-
екта может быть невидимой, если значение свойства Visible равно О
(WordTextBox.Line.Visible:=0). Если свойству Visible присвоить значение —I,
то линия станет видимой. Наиболее часто используются свойства объекта
Line, определяющие толщину и цвет линий. Если линия границы имеет
толщину больше одного пиксела, то можно задать прозрачность цвета
(свойство Transparency). В этом случае линия будет выглядеть как точки,
между которыми есть просвет. Рассмотрим следующий исходный текст.
Задание видимости, толщины и цвета линии границы надписи
procedure TOKBottomDlg4.CheckBox2Click(Sender: TObject);
begin
if CheckBox2.Checked then WordTextBox.Line.Visible:=-l
else WordTextBox.Line.Visible:=0;
end;
procedure TOKBottomDlg4.ButtonlClick(Sender: TObject);
begin
if not ColorDialogl.Execute then exit;
WordTextBox.Line.ForeColor.RGB:=ColorDialogl.Color;
end;
procedure TOKBottomDlg4.SpinButtonlDownClick(Sender: TObject);
begin
WordTextBox.Line.Weight:=WordTextBox.Line.Weight-0. 25 ;
end;
procedure TOKBottomDlg4.SpinButton2DownClick(Sender: TObject);
begin
if WordTextBox.Line.Transparency WordTextBox.Line.Transparency:=WordTextBox.Line.Transparency+O.01;
end;



Первая процедура задает видимость границы объекта, вторая определяет ее
цвет, присваивая значение цвета в формате RGB свойству ForeColor.RGB.
Третья процедура определяет толщину линии границы, присваивая ее зна-
чение свойству WordTextBox.Line.Weight, которое имеет тип Extended. По-
следняя процедура определяет прозрачность линии и задает для свойства
Line.Transparency значение от 0 до 1, имеющее тип Extended. Применяя эти
процедуры, мы можем получить результат, который может быть, например,
таким, как показано на рис. 8.10.

Рис. 8.10. Выбор толщины и цвета линии границы надписи
Для задания вида линии можно использовать узор из набора возможных
вариантов. Узор определяется целочисленной константой, которая записы-
вается в поле Line.Pattern. Используя это свойство, запишем значение кон-
станты, выбрав его как индекс элемента управления Pattern:TComboBox
(комбинированный список).
Выбор узора для линии границы надписи
WordTextBox.Line.Pattern:=Pattern.Itemlndex+l;



Результат изменений представлен на рис. 8.11.

Рис. 8.11. Выбор узора для линии границы надписи
Если линия границы представлена не в виде узора, а в виде сплошной ли-
нии, то можно дополнительно задать тип линии и ее шаблон. Тип линии
определяется присваиванием целочисленной константы свойству Line.Style.
Если это свойство установить в значение msoLineSingle=0, то получится
сплошная линия. Если этот стиль нас не устраивает, то используем следую-
щую процедуру.
Задание стиля линии границы надписи
procedure TOKBottomDlg4.StyleChange(Sender: TObject);
begin
WordTextBox.Line.Style:=Style.Itemlndex+l;
end;



С помощью этой процедуры мы можем изменить стиль линии, например,
как показано на рис. 8.12.
Шаблон линии определяется присваиванием целочисленной константы
свойству Line.DashStyle надписи. Если это свойство установить в значение
msoLineSolid=0, то линия будет сплошной, без разрывов. Если нужно вы-
брать другой шаблон линии, то данному свойству можно присвоить значе-
ние другой константы из списка возможных.

Рис. 8.12. Выбор стиля линии границы надписи
Выбор вида разрыва для линии границы надписи
procedure TOKBottomDlg4.DashStyleChange(Sender: TObject);
begin
WordTextBox.Line.DashStyle:=DashStyle.Itemlndex+l;
end;



Пример результата выполнения этой процедуры показан на рис. 8.13.

Рис. 8.13. Выбор стиля разрыва линии границы надписи
Опубликовал Kest September 23 2009 11:15:58 · 0 Комментариев · 4720 Прочтений · Для печати

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
Animated Menus
Панель для реклам...
Распознавание иде...
AdBlaster v2.5 - ...
PDJPack
WinPopup
Андрей Боровский....
AddPage [Исходник...
EMS QuickExport S...
Моделирование дви...
Анекдоты с ostrie.ru
Visual Basic Script
Шифрование по алг...
Binary2XMLDemo (Р...
WAP версия сайта
Шейдеры в Delphi
ScrollCredit
Page Promoter 7.7...
Программирование ...
Dynamic Titles дл...

Топ загрузок
Приложение Клие... 100510
Delphi 7 Enterp... 89950
Converter AMR<-... 20090
GPSS World Stud... 14735
Borland C++Buil... 12617
Borland Delphi ... 8898
Turbo Pascal fo... 7088
Калькулятор [Ис... 5100
Visual Studio 2... 5016
FreeSMS v1.3.1 3552
Случайные статьи
Универсальная дост...
Интерфейс IUnknown
Visual Studio. Ком...
Система Mach
10.4. Методы умень...
Обслуживание и под...
Копирование структур
Итоги
Абстрактные типы д...
Основная работа вы...
Виртуализация внеш...
Перегрузка операци...
Окно «Параметры Wo...
Операции управлени...
BUFFER (ВОЗОБНОВИТ...
Жесткая кодировка ...
Язык С: ассоциатив...
Создание 3х массив...
Выберите то, что м...
Построение Windows...
Управление синхрон...
Функция list1
Как правильно подо...
Простейшие алгорит...
Filles kazakh
Статистика



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


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