Перевод цветов

[RIO]

Здравствуйте ! Как перевести палитру в HTML цвета. То есть если я имею RGB - 255, 0, 0, что соетветствует красному цвету, в HTML он будет выглядеть так #FF0000. Какой здесь алгоритм ? Перевод 16тиричную систему или что-то другое ?

[Пепел Феникса]

3 шестнадцатеричных числа(6 шестнадцатеричных цифр)
#RRGGBB все обязательны.

[mihali4]

В Дельфи все наоборот - $BBGGRR...
Чисто красный - $0000FF
Чисто зеленый - $00FF00
Чисто синий - $FF0000
Кто не верит - пусть проверит

[russian-stalker]

Если верить википедии, то вы не правы:
http://ru.wikipedia.org/wiki/%D0%A6%...%82%D0%B0_HTML

upd:
Проверил, вы не правы

[mihali4]

У вас как со зрением-то?
Первое слово в посте номер 3 прочитать можете?

procedure TForm1.ButtonRedClick(Sender: TObject);
begin
Color:=$0000FF;
end;                 

procedure TForm1.ButtonBlueClick(Sender: TObject);
begin
Color:=$FF0000;
end;

procedure TForm1.ButtonGreenClick(Sender: TObject);
begin
Color:=$00FF00;
end;

[russian-stalker]

Извините, читаю одно, а думаю другое

[RIO]

Спасибо всем, значит так для красного : R = FF, G = 0, B = 0
Как слепить из него #FF0000, то есть, если R, G или B = одна цифра, тогда нужно дописать ту же цифру к ней. Правильно понял ? Например если R = 1, тогда буде #11 . . . ?

[Alex Cones]

Нет
Если на кодирование R идет одна десятичная цифра, то в к ней должны прибавить "0".
$000003
$00000A
Если хотите перевести в нормальный РГБ, перенесите два последних символа:

HTMLColor := Copy(DelphiColor,5,2) + Copy(DelphiColor,3,2) +Copy(DelphiColor,1,2);

[mihali4]

Стоп. Ваш вопрос (я напомню):

Как перевести палитру в HTML цвета

Вам достаточно просто поменять местами крайние байты дельфийского значения цвета...

[RIO]

А как реализовать подобное ? :

var
  HTMLColor, DelphiColor: string;
begin
  if ColorDialog1.Execute then
  begin
     DelphiColor := ColorDialog1.Color; // Вот здесь проблема  
     HTMLColor := Copy(DelphiColor, 5, 2) + Copy(DelphiColor, 3, 2) +
                  Copy(DelphiColor, 1, 2);
     ShowMessage(HTMLColor);
  end;
end;

То есть брать что бы пользователь выбирал цвет из колордиалога и он переводился в аштимиел цвет ?