propety write geht nicht ??!!

[Snoop007]

hi,
ich schreibe gerade eine komponente
wenn ein neuer string hinzugefügt wurde, muss ich die komponente neu zeichnen lassen
meine property hat folgende strucktur

Delphi-Quellcode:

    procedure schreiben(value : TStringlist);
    procedure buttonszeigen;
    function lesen :TStringlist ;
  public
    constructor create(AOwner : TComponent); override;
  published
    property Items : TStringlist read lesen write schreiben;
  end;

aber die procedure schreiben wird nicht aufgerufen, lesen geht

wieso frage ich mich bloss ??!!