[dec]

Hola,

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  // 65535 = clYellow
  Self.Color := TColor(65535);
end;