Tedit disabled

[ketraun]

hi,

so gehts offensichtlich nicht:

Code:

procedure TmaskEditL.SetEnabled(Value: Boolean);
begin
  inherited;
  if Value then
     Font.Color := clWindowText
  else
     Font.Color := fcolor;
   invalidate;
end;

nach dem inherited ist offensichtlich alles vorbei. Es nützt also garnichts hier die Farbe zu ändern!
ketraun