[Страдалецъ]

А так не проще будет?

Код:

 type
   TSentens = Class
     private
       fstAll         : String;
     published
       property stAll: String read fstAll write fstAll; 
       constructor Create(Text : String);
   end;