Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.03.27;
Скачать: [xml.tar.bz2];

Вниз

Какие параметры цвета (RGB) для стандартного фона формы?   Найти похожие ветки 

 
Гость   (2005-03-03 11:47) [0]

Какие параметры цвета (RGB) для стандартного фона формы (clBtnFace)?


 
Gero ©   (2005-03-03 12:00) [1]

212, 208, 200


 
Анонимщик1   (2005-03-03 12:01) [2]

Это задается цветовой схемой. Дл какой схемы какие RGB - не знаю, но получи этот цвет в переменную типа TColor и посмотри.


 
Poirot ©   (2005-03-03 12:03) [3]

ColorToRGB(clBtnFace)
а потом раскладывать на RGB просто)))


 
Гость   (2005-03-04 09:49) [4]

Хотелось бы уточнить. В хелпе написано:

var
 L : Longint;
begin
 L := ColorToRGB(сlBtnFace);
end;

А как из этого "вырезать" номера цветов?


 
Cosinus ©   (2005-03-04 09:51) [5]


> Гость   (04.03.05 09:49) [4]

GetRValue
GetBValue
GetGValue
Вроде...


 
Гость   (2005-03-04 09:53) [6]

Ну а в коде как будет смотреться?


 
Cosinus ©   (2005-03-04 10:01) [7]


> Гость   (04.03.05 09:53) [6]
Замечательно будет смотрется! :))) Эх, а если еще бантик подвесить...

F1 нажать "религия не позволяет"(С не мое)?


 
Гость   (2005-03-04 18:05) [8]


> GetRValue
> GetBValue
> GetGValue Вроде...

Ну нет такого в хелпе


 
Smithson   (2005-03-04 18:26) [9]

Есть такое в helpe (uses Graphics). Только учти, что пользователь может сменить системную схему и у него цвет формы станет не серым, а зеленым. Так что не закладывайся на это значение.


 
begin...end ©   (2005-03-04 18:30) [10]

> Гость   (04.03.05 18:05) [8]

Функции GetRValue, GetGValue и GetBValue описаны в справке по API. См. Help -> Windows SDK.


 
Poirot ©   (2005-03-04 18:38) [11]

Smithson   (04.03.05 18:26) [9]
Если он сменит значение то и ColorToRGB(clBtnFace) даст другое значение, которое и буит совпадать с текущими настройкамим палитры:) Только главное это нать отлоыить изменение темы:)


 
Defunct ©   (2005-03-04 19:34) [12]

> А как из этого "вырезать" номера цветов?

type
    TRGBColor = packed Record
      B          : byte;
      G          : byte;
      R          : byte;
      AlfaChanel : byte;
    end;

TRGBColor( Color ).R := ..
TRGBColor( Color ).G := ..
TRGBColor( Color ).B := ..

и т.п.


 
begin...end ©   (2005-03-04 19:44) [13]

> Defunct ©   (04.03.05 19:34) [12]

Если Color - это переменная типа TColor, то ответ неверный.


 
Anatoly Podgoretsky ©   (2005-03-04 19:50) [14]

Это переменная типа TRGBColor


 
begin...end ©   (2005-03-04 19:59) [15]

> Anatoly Podgoretsky ©   (04.03.05 19:50) [14]

Тогда ответ [12] не имеет смысла в контексте данной ветки.

Возможно (судя по [4]), Color - это переменная типа LongInt, представляющая собой результат функции GetRGBColor. Тем не менее, в этом случае ответ [12] всё равно неверен.


 
Defunct ©   (2005-03-04 20:03) [16]

begin...end ©   (04.03.05 19:44) [13]

Color : TColor тоже годится (TColor - 32Bit как и LongInt).

ответ был на пост [4]

Color := ColorToRGB(сlBtnFace);
дальше [12]


 
Defunct ©   (2005-03-04 20:04) [17]

begin...end ©   (04.03.05 19:59) [15]

В чем заключается неверность ответа?


 
begin...end ©   (2005-03-04 20:09) [18]

> Defunct ©   (04.03.05 20:04) [17]

Из справки по типу TColor:

If you specify TColor as a specific 4-byte hexadecimal number instead of using the constants defined in the Graphics unit, the low three bytes represent RGB color intensities for blue, green, and red, respectively. The value $00FF0000 (Delphi) or 0x00FF0000 (C++) represents full-intensity, pure blue, $0000FF00 (Delphi) or 0x0000FF00 (C++) is pure green, and $000000FF (Delphi) or 0x000000FF (C++) is pure red. $00000000 (Delphi) or 0x00000000 (C++) is black and $00FFFFFF (Delphi) or 0x00FFFFFF (C++) is white.

Теперь посмотрите на объявленный Вами тип TRGBColor. Стало понятно?


 
Anatoly Podgoretsky ©   (2005-03-04 20:11) [19]

Ой, на порядок байт не посмотрел. Ты прав.


 
Defunct ©   (2005-03-04 20:35) [20]

begin...end ©   (04.03.05 20:09) [18]
bingo! сколько очков уже? ;>

Сорри Опечатка.
Поменять местами R и B.

В объявленном рекорде[12] - цвет пикселя из BMPStream"a.


 
begin...end ©   (2005-03-04 20:39) [21]

> Defunct ©   (04.03.05 20:35) [20]

> сколько очков уже?

Я не ношу очки.


 
IceBeerg ©   (2005-03-05 10:01) [22]

А если набрать clBtnFace и правой кнопкой его и т.д., а?


 
Гость   (2005-03-05 14:48) [23]

Ребята, мне надо на форму положить рисунок с цветом фона как у формы. И все. Но не знаю, какой цвет в RGB поставить на фон самого рисунка. Насколько я понял, пример [12] разрешает поменять цвет формы на нужный, зная RGB цвета. А мне надо вывести (например в Label) номера цветов  R, G и В clBtnFace формы.
Спасибо.


 
Cosinus ©   (2005-03-05 14:50) [24]


> Гость   (05.03.05 14:48) [23]
Тогда проще. Image.Transparent:=True;


 
Anatoly Podgoretsky ©   (2005-03-05 14:51) [25]

Гость   (05.03.05 14:48) [23]
Ни какой, просто нет такого, это динамическая величина, управляемая пользователем. Зато можно получить это значение через ColorToRGB, но еще проще и возможно правильнее включить прозрачный цвет у рисунка (смотри свойства в инспекторе объектов), тогда этот цвет вообще не надо узнавать.


 
Гость   (2005-03-05 15:35) [26]

что значит "прозрачный цвет"? Мне надо только фон картинки сделать таким же как у формы. А что его (фон) можна убрать?


 
Anatoly Podgoretsky ©   (2005-03-05 15:38) [27]

Так ты выполнил инструкцию по поводу Инспектора объектов или нет, посмотрел ли ты справку по компоненту?
Или ты партнер?


 
Гость   (2005-03-05 15:48) [28]

кто такой "партнер"?


 
Гость   (2005-03-15 11:03) [29]

Спасибо, нашел. Оказывается, достаточно Image1.Transparent:=true
Ну а кто такой "партнер", я так и не понял.


 
Defunct ©   (2005-03-15 11:22) [30]

реклама АО МММ
- халявщик ты Лёнька!
- нет брат, я партнер.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.03.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.51 MB
Время: 0.037 c
14-1110352096
atr
2005-03-09 10:08
2005.03.27
Отладка программы. Help!


6-1106728778
ArchValentin
2005-01-26 11:39
2005.03.27
Глупый вопрос про ServerSocket...


3-1109488218
Dyusha
2005-02-27 10:10
2005.03.27
Экспорт StringGrid в ADOQuery


1-1110642525
ShimON
2005-03-12 18:48
2005.03.27
Колонка CheckBox ов в StringGrid e


1-1110814150
Ivolg
2005-03-14 18:29
2005.03.27
Подсветка Синтаксиса!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский