Error de dirección en un tedit

[dicatek]

Hola!

Estoy usando el codigó que me enseñó seoane para usar una paleta de colores con sus codigos en hexadecimal.

Código Delphi [-]
var  StrColor: string;begin  with TColorDialog.Create(self) do  try    if Execute then    begin      StrColor:= IntToHex(Color,6);      Edit1.Text:= StrColor;    end;  finally    Free;  end;end;

Y el siguiente para usarlo

Código Delphi [-]
var  MiColor: TColor;begin  MiColor:= StrToIntDef('$'+Edit1.Text,0);end;

El problema que tengo es que en el Edit1 el codigo hexadecimal de los colores, no me sale de izquierda a derecha, si no que me sale, de derecha a izquierda. Como puedo solventar este conflicto?

Gracias anticipadas!