TEdit y TLabel, cada letra de un color

[Neftali [Germán.Estévez]]

Tal y como comenta Agustín, si deseas usar un Label con un método nuevo, deberás crear un nuevo componente y añadir las características que necesites.
Segúramenet sobrescribiendo el método paint:

Código Delphi [-]
  procedure Paint; override;

La otra opción, para no "reinventar la rueda" es usar un TRickEdit, que ya posee todo lo necesarios para colorear el texto que hay en su interior.

Código Delphi [-]
  reTexto.lines.Clear;
  reTexto.SelAttributes.Color := clBlack;
  reTexto.lines.Add('camión');
  reTexto.SelStart := 4;
  reTexto.SelLength := 1;
  reTexto.SelAttributes.Color := clRed;