Отправляет email-рассылки с помощью сервиса Sendsay

Visual Basic.NET. Уроки

  Все выпуски  

Visual Basic.NET. Уроки


Информационный Канал Subscribe.Ru

H1{ background-color : Black; font-size : medium; color: White; } H1.menu { background-color : #cccccc; color : black; } pre{ background-color : #EEEEEE; } pre strong{ font-weight : bold; } pre.vb u{ color:#663399; text-decoration : none; } pre.vb em{ color: Green; font-style: normal; }

VB.NET. Программирование для Windows. Уроки с сайта http://progs.biz

Рассылка №29

VB.NET для Windows. Урок 20. Диалог для выбора цвета (класс ColorDialog).

Полные версии уроков (с картинками) можно найти по адресам
Урок 20. Диалог для выбора цвета (класс ColorDialog).

VB.NET для Windows. Урок 20. Диалог для выбора цвета (класс ColorDialog)

Диалог для выбора цвета относится к стандартным. На панели элементов он выглядит так.

Перенесите его двойным щелчком на свободное пространство под нашей формой. Добавьте еще на форму кнопку - если пользователь щелкнет на ней, то появится наше диалоговое окно для выбора цвета.

Наша программа будет менять цвет своей главной формы в зависимости от того, что за цвет пользователь выберет в дилоговом окне. В обработчик для кнопки внесите следующий код:

    Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
        'Если пользователь нажал OK
        If ColorDialog1.ShowDialog() = DialogResult.OK Then
            'Закрашиваем форму
            Me.BackColor = ColorDialog1.Color
        End If
    End Sub

Как вы тут видите, основное свойсто для диалога ColorDialog - это Color. Именно оно и определяет выбранный цвет. Это свойство можно задавать и перед вызовом ShowDialog (для выбора определенного цвета заранее).

Вот еще важные свойства для этого диалогового окна:

Свойство AllowFullColor логического типа определяет, может ли пользователь задавать собственные цвета. По умолчанию оно равно true - и пользователь может выбирать цвета из всей палиты.

Если же оно равно false, то кнопка "Определить цвет" на диалоге ColorDialog будет недоступной.

В диалоговом окне можно задавать и собственые цвета. Для этого в диалоге предусмотрено 16 мест. За эти цвета отвечает свойство CustomColors диалогового окна ColorDialog. По непонятным причнам элементы CustomColors имеют тип не Color, а Int32, поэтому код, задающий пользовательские цвета, может быть, например, таким:

        'Определяем массив целых чисел из цветов
        Dim MyColors() As Int32 = {Math.Abs(Color.Cyan.ToArgb), _
        Math.Abs(Color.Aquamarine.ToArgb), _
        Math.Abs(Color.Tomato.ToArgb)}
        'Присваиваем свойству CustomColors диалогового окна
        ColorDialog1.CustomColors = MyColors
        'ПОказываем диалог
        If ColorDialog1.ShowDialog() = DialogResult.OK Then
            Me.BackColor = ColorDialog1.Color
        End If

Тут мы сначала определяем массив из трех цветов (как значения типа Int32 - для этого мы переводим реальные цвета методом ToArgb к типу Int32), после чего мы записываем этот массив в массив CustomColors диалогового окна ColorDialog1. После запуска наше окно будет иметь пользовательские цвета.

Наверх
Рассылки Subscribe.Ru
Уроки по Visual C++ (MFC, платформа .NET)

Уроки по Visual C++.NET, MFC, ActiveX, COM-технологиям. Примеры программ. Каждый урок содержит информацию только по существу и расчитан на 10-20 минут. Уроки по каждой теме независимы.


Copyright Алексеев Игорь, 2002

Copyright сайт progs.biz, 2002



http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное