Вниз
Скачать: CL | DM;

помогите с TColor   Найти похожие ветки 

 
Шишкин Илья ©   (2003-04-03 16:13) [0]

Необходимо считать значение из текстового файла.
Желательно, чтобы информация хранилась в формате RGB. Например зелёный цвет: 00FF00. Солько не пробовал не получается.


 
MBo ©   (2003-04-03 16:18) [1]

Как пробовал?


 
Юрий Зотов ©   (2003-04-03 16:19) [2]

TColor - это целое 4-байтовое число. Его младшие три байта - это как раз RGB, старший - палитра. Можно писать это число напрямую, можно сначала вызвать ColorToRGB и писать результат. Какие проблемы?


 
Шишкин Илья ©   (2003-04-03 16:28) [3]

Например: у меня есть переменная типа String. Допустим str. str=00FF00. Как мне перевести str в тип TColor (переменная clr)?


 
Roma ©   (2003-04-03 16:31) [4]

StringToColor, ColorToString + See Also


 
N163   (2003-04-03 16:31) [5]

clr:=TColor(StrToInt("$"+str));


 
Юрий Зотов ©   (2003-04-03 16:32) [6]

Clr := TColor(StrToInt(Str));

Только при чем тут строки? Что, числа в файлы уже писать нельзя?


 
Phantomouse ©   (2003-04-03 16:41) [7]

Допустим, что есть строка S, в которой хранится цвет в виде строки...
ЧЕТОТАМ.Color:=RGB(StrToInt(Copy(Edit1.Text,0,2)),StrToInt(Copy(Edit1.Text,2,4)),StrToInt(Copy(Edit1.Text,4,6)));CODE>


 
Phantomouse ©   (2003-04-03 16:42) [8]

Допустим, что есть строка S, в которой хранится цвет в виде строки...
ЧЕТОТАМ.Color:=RGB(StrToInt(Copy(Edit1.Text,0,2)),StrToInt(Copy(Edit1.Text,2,4)),StrToInt(Copy(Edit1.Text,4,6)));



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
1-44249
Soft
2003-04-01 18:00
2003.04.14
Дата и время в BCD формате в TDateTime


14-44365
Дмитрий К.К.
2003-03-31 11:46
2003.04.14
Именинники 30 марта


1-44158
Шишкин Илья
2003-04-03 16:13
2003.04.14
помогите с TColor


6-44303
Translator
2003-02-21 11:44
2003.04.14
связь Delphi с Excel


14-44396
Anatoly Podgoretsky
2003-03-28 13:00
2003.04.14
Заработало




   Наверх