Ver Mensaje Individual
  #1  
Antiguo 30-06-2006
dicatek dicatek is offline
Miembro
 
Registrado: jun 2006
Posts: 46
Reputación: 0
dicatek Va por buen camino
Error de dirección en un tedit

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!
Responder Con Cita