2 replies to this topic

[HMartinazzi]

Me gustaría saber si se puede mostrar un ColorComboBox Con los nombres de los colores en Español

[egostar]

Me gustaría saber si se puede mostrar un ColorComboBox Con los nombres de los colores en Español

Hola,

Pues será cuestión de ver si se puede cambiar en el código de la unidad UITypes o creando un componente nuevo, no sé.

Saludos

[escafandra]

Localiza la unidad Graphics.pas en la carpeta VCL, cópiala en otra carpeta y edita los nombres de los colores como muestro:

delphi

{ Color mapping routines }
 
const
  Colors: array[0..51] of TIdentMapEntry = (
    (Value: clBlack; Name: 'Negro'),
    (Value: clMaroon; Name: 'Granate'),
    (Value: clGreen; Name: 'Verde'),
    (Value: clOlive; Name: 'Verde Aceituna'),
    (Value: clNavy; Name: 'Azul Marino'),
    (Value: clPurple; Name: 'Púrpura'),
    (Value: clTeal; Name: 'Verde azulado'),
    (Value: clGray; Name: 'Griis'),
    (Value: clSilver; Name: 'Plata'),
    (Value: clRed; Name: 'Rojo'),
    (Value: clLime; Name: 'Lima'),
    (Value: clYellow; Name: 'Amarillo'),
    (Value: clBlue; Name: 'Azul'),
    (Value: clFuchsia; Name: 'Fucsia'),
    (Value: clAqua; Name: 'Agua'),
    (Value: clWhite; Name: 'Blanco'),
 
    (Value: clMoneyGreen; Name: 'Verde dinero'),
    (Value: clSkyBlue; Name: 'Azul Cielo'),
    (Value: clCream; Name: 'Crema'),
    ........

En tu proyecto añade esa carpeta a la ruta de búsqueda y complia. Debe aparecer en la carpeta donde colocaste el Graphics.pas, el archivo Graphics.dcu
 
Ahora tus colores aparecerán traducidos.

 

Saludos.