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

Вниз

Как получичть из строки цвет   Найти похожие ветки 

 
VJar   (2002-05-12 02:30) [0]

Допустим у меня есть строка "$FFFFF" (белый цвет).
Как можно перевести ее в переменную типа TColor,
которую уже можно применять для изменения цвета
допустим формы?


 
Almaz   (2002-05-12 03:00) [1]

Проще, чем кажется:


var
S: String;
...
S := "$FFFFFF";
Form1.Color := StrToInt(S);


Удачи.


 
[NIKEL]   (2002-05-12 03:49) [2]

В модуле graphics имеются две недокументированные функции:
function ColorToString(Color: TColor): string;

Если значение TColor является именованным цветом, функция возвращает имя цвета ("clRed"). В противном случае возвращается шестнадцатиричное значение цвета в виде строки.

function StringToColor(S: string): TColor;

Данная функция преобразует "clRed" или "$0000FF" во внутреннее значение цвета.



 
VJar   (2002-05-12 11:18) [3]

Большо спасибо. Мне это очень помогло



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

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

Наверх




Память: 0.44 MB
Время: 0.011 c
1-73293
Tosha_a
2002-05-11 19:37
2002.05.23
как вызвать процедуру?


1-73249
nobody2002
2002-05-10 15:49
2002.05.23
Копирование файла на дискету


3-73004
Bardel
2002-04-25 15:36
2002.05.23
параметрическое задание таблиц в query


4-73465
vitall
2002-03-25 13:21
2002.05.23
Подскажите, где ошибка? Вроде все правильно, но не работает...


7-73416
Hokum
2002-02-18 16:39
2002.05.23
Скрыть элементы рабочего стола





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский