QBColor(Color)
Функция QBColor получает RGB-код цвета из старой Бейсик-кодировки цвета. Функция RGB обладает большими возможностями для управления цветом
Возвращаемое значение: Функция QBColor возвращет значение типа Long, содержащее RGB-код заданного цвета
Параметры:
Color - Обязательный аргумент типа Integer может представлять целое число от 0 до 15
Бейсик-кодировка
Номер |
Цвет |
Номер |
Цвет |
0 |
Черный |
8 |
Светло-серый |
1 |
Темно-синий |
9 |
Синий |
2 |
Темно-зеленый |
10 |
Зеленый |
3 |
Бирюзовый |
11 |
Голубой |
4 |
Малиновый |
12 |
Красный |
5 |
Сиреневый |
13 |
Розовый |
6 |
Оливковый |
14 |
Желтый |
7 |
Темно-серый |
15 |
Белый |
Пример
' Установим фон формы в синий цвет
Form1.BackColor = QBColor(9)
|