FillRect(Rect) geht und in der Unterprocedure geht es nicht

[jbg]

Zitat von JoelH:

Der Code :

Delphi-Quellcode:

  public
    { Public declarations }
    constructor Create(Aowner: TComponent); overload; override;
    constructor Create(Aowner: TComponent; ab: TDate; uetage: Integer); overload;
  end;