Ver Mensaje Individual
  #7  
Antiguo 07-02-2018
strelok strelok is offline
Miembro
 
Registrado: sep 2017
Posts: 181
Reputación: 7
strelok Va por buen camino
Cita:
Empezado por oscorm Ver Mensaje
TadvEdit es un componente de la suite TMS . He estado mirando el código y lo tienes chupado.
Código Delphi [-]
constructor TAdvEdit.Create(AOwner: TComponent);
var
  VerInfo: TOSVersioninfo;
  i: integer;

begin
  inherited Create(aOwner);
  FFocusColor := clNone;
  FFocusFontColor := clWindowText;
  FNormalColor := clWindow;
  FFontColor := self.Font.Color;
  FBorderColor := clNone;
  FModifiedColor := clHighLight;
  FErrorColor := clRed;
  FErrorFontColor := clWhite;
  FURLColor := clBlue;
  FDisabledColor := clSilver;
  FFlatParentColor := True;
  FFlatLineColor := clBlack;
 .......
Asi que pones los colores que tu creas convenientes en donde toque y a correr.
¿chupado? no entendí.
Lo solucioné mirando el código interno, me di cuenta que reemplaza el del formulario si llamas a "Init", por ende, mi código estaba casi perfecto, solo faltaba una línea.
miEditdeTMS.Init;

Que ganas de pegarme un tiro jajaja, días perdidos con esto
Responder Con Cita