вывести цвет из..

[new]

Помогите пожалуйста.
У меня такая задача.
Нужно цвет выбранный в colordialog вывести в edit..при этом шестнадцеричном формате..
Например если Юзверь выберет красный то в едит должно попасть #ff0000 или если белый #ffffff.
При этом алгоритм должен работать в обе стороны.
т.е.
Переводить значение tcolor в шестнадцеричный формат и наоборот из шестнадцеричного в значение tcolor.
Спасибо.

 

[zubr]

Edit1.Text:=IntToHex(Integer(clWhite), 6);

 

[new]

Спасибо.

Почему-то я думал, что это сложнее...