Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

String в TColor [D6]

ТехникПТО © (2005-03-02 18:26:00)
Есть переменная в которую ранее был сохранен цвет... а как обратно перевести String в Color??

Просто Джо (2005-03-03 14:04:00) [1]

> [18] Reindeer Moss Eater © (03.03.05 09:35)
> Зачем вообще надо ьыло переводить цвет в строку?

Ну, например, для записи в конф. файл. Дело в том, что если цвет можно выразить через константу clXXX, то ColorToString это сделает. И в ини-файл это будет смотреться "красивше", чем 032013202.
Но автор, похоже, потерял бумажку с урл мастаков и больше не вернется :)

Erik1 (2005-03-03 11:02:00) [2]
А может RTTI подключить, тогда цвет можно получить как 'clBlack' автоматически.

Reindeer Moss Eater (2005-03-03 09:35:00) [3]
Зачем вообще надо ьыло переводить цвет в строку?

Anatoly Podgoretsky (2005-03-03 09:33:00) [4]
Просто Джо © (03.03.05 02:01) [16]
Еще надешься, а я вот надежду давно потерял.

Просто Джо (2005-03-03 02:01:00) [5]
Ну, автор вопроса выберет подходящее ;)
Или, наконец, удосужится грамотно задать вопрос.

GanibalLector (2005-03-03 01:47:00) [6]
Согласен с [10],сам так работаю.Хотя также согласен с [12]

Просто Джо (2005-03-03 01:28:00) [7]
В сабже фигурировали string и TColor, по-моему, нет ничего странного в варианте [10]

begin...end (2005-03-02 21:28:00) [8]
> Anatoly Podgoretsky © (02.03.05 21:27) [12]

Я пас :-)

Anatoly Podgoretsky (2005-03-02 21:27:00) [9]
Продолжим список или как?

begin...end (2005-03-02 21:26:00) [10]
> Просто Джо © (02.03.05 21:23) [10]

Точно так же, не будет никаких других вариантов, если использовать связку IntToStr и StrToInt.

Просто Джо (2005-03-02 21:23:00) [11]

> [9] Anatoly Podgoretsky © (02.03.05 20:28)
> Количество вариантов сохранения такое, что на них не хватит
> ни каких измывательств.

Не будет никаких других вариантов, если использовать связку:
ColorToString & StringToColor

Anatoly Podgoretsky (2005-03-02 20:28:00) [12]
Количество вариантов сохранения такое, что на них не хватит ни каких измывательств.

Просто Джо (2005-03-02 19:43:00) [13]
Автору:
используй ColorToString, чтобы над тобой не измывались как в [7] DiamondShark ©
:)

DiamondShark (2005-03-02 18:45:00) [14]
Ух ты, какие способные телепаты!
Мне вот без описания алгоритма, как "ранее был сохранен цвет" совсем не ясно, как "обратно перевести".

Просто Джо (2005-03-02 18:43:00) [15]
StringToColorв модуле Graphics.pas
Берет также константы типа clXXX

Knoxville (2005-03-02 18:37:00) [16]
Напиши свою ф-цию типа

function StrToColor(color: String): TColor; begin if color := 'clBlack' then Result := clBlack; ..... end;

Это конечно долго и много, но зато ты можешь хранить цвет, как "черный" или "black" и т.п, а не только как "clBlack"

Antonn (2005-03-02 18:33:00) [17]

> Вообще TColor - это число... Следовательно StrToInt.

Мало ли, вдруг человек хранит clblack как 'black' :)

Reindeer Moss Eater (2005-03-02 18:30:00) [18]
MyColor:= StrToInt(StringWithColor);

GLFox (2005-03-02 18:29:00) [19]
Вообще TColor - это число... Следовательно StrToInt.

Antonn (2005-03-02 18:27:00) [20]
ТехникПТО © (02.03.05 18:26)
А в каком виде он хранился?

Наверх

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