| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как получичть из строки цвет [D5, Win95/98]

VJar ©   (2002-05-12 02:30:00) 

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

---

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

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

---

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

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

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

function StringToColor(S: string): TColor;

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

---

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

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


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

Удачи.

---

Наверх