Задание цвета в клиент серверном приложении

[Ящерка]

Есть клиент, есть сервер, необходимо решить следующую задачу, при регистрации пользователя он должен выбрать цвет, который за ним будет закреплен, при чем так, что цвет будет передаваться так же как и ник в чат, другие пользователи должны видеть именно тот цвет который для себя выберите вы сами.

[_PROGRAMM_]

Ну и каким образом я могу Вам помочь? Как выводится текст? Какой язык? Какая ОС? Исходники в студию.

[Son Of Pain]

Передавать цвет вместе с ником. Это все, что мы можем сказать при такой постановке вопроса )

[Stilet]

Полагаю что речь идет о следующем:

 idhttp.Post('http://сайт?Color='+IntToStr(ColorBox1.Colors[ColorBox1.ItemIndex])+'&Nik=Никнейм');

Где ColorBox1 компонент TColorBox на форме.

[Ящерка]

Ой, действительно))) Delphi все на делфи)))
Я применяю вот такую процедуру procedure

TNastrForm.OkBtnClick(Sender: TObject);

var
  с:LongInt;
  ServerName: string;
  IniFile: TIniFile;
  const
  S = 'xyz';
begin
  if ColorDialog1.Execute then
  begin
    Shape1.Brush.Color := ColorDialog1.Color;
  IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) + '\Nastroiki.ini');
  IniFile.WriteString('Options', 'Color', ColorToString(Shape1.Brush.Color));
  IniFile.Free;
  NastrForm.Close;
end;
end;

А в сервере передаю это

function TServerForm.AddColorText(Text: String; Color: TColor): String;
begin
  RichEdit.SelAttributes.Color := Color;
  RichEdit.SelText := Text;
  RichEdit.SelAttributes.Color := clBlack;
end;

[Stilet]

А в сервере передаю это

Передаешь текст и колор? Ну так тогда как я и показал

post('http://site?Text='+Текст+'&Color='+IntToStr(Shape1.Brush.Color));