Навигация
Главная
Поиск
Форум
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
Имитационное мо... 59857
Реклама
Сейчас на сайте
Гостей: 5
На сайте нет зарегистрированных пользователей

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

Моделирование процесса передачи данных по магистрали с основным и резерв...
Программа тестирования (тест) - вступительные экзамены (математика, физи...
Моделирование информационно-поисковой библиографической системы на gpss ...

Реклама



Подписывайся на 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 Комментариев · 4754 Прочтений · Для печати

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
Ведение справочны...
Интерактивный инт...
FatScrollbar
PHP 5 в подлинник...
ATComponents
Библия хакера 2. ...
Добавление к ссы...
Пример работы с б...
Пятнашки и крести...
PDJXPPack
Java 2. Наиболее ...
Добавление басса ...
Midi
Язык программиров...
RxLIB
PHP5. Профессиона...
Calendar
Игра "Астероиды" ...
SUIPack
Синтаксический ан...

Топ загрузок
Приложение Клие... 100516
Delphi 7 Enterp... 90762
Converter AMR<-... 20095
GPSS World Stud... 15040
Borland C++Buil... 12798
Borland Delphi ... 9006
Turbo Pascal fo... 7101
Калькулятор [Ис... 5145
Visual Studio 2... 5022
FreeSMS v1.3.1 3556
Случайные статьи
АЙ СИК Ю? АЙ ХАК Ю!
История возникнове...
Выражения: операто...
Специализации шаблона
Процедуры кодирова...
Перегрузка функций...
Метод повторного х...
Как перемещать кур...
Обратите внимание ...
Создание потоков. ...
Табл. 13-14.
"," expected
Когда заказ сделан...
Абстрактные типы д...
Политики Accompli
Некоторые дополнит...
Настраиваемые инте...
Полезные добавки к...
Работа казино Кинг
Сетевой инженер со...
Создание поставщик...
Оценка рисков безо...
Внешние объекты (OLE)
consult(X)
Стремитесь к нетра...
Статистика



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


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