Spaltenweise auf TStringList zugreifen

[aaaaaaaaaa_10]

Mit :

Delphi-Quellcode:

type
  TMomFiles=class(TForm)
  private
   FZeilenanzahl : integer;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
     ......
    property Zeilenanzahl: Integer Read FZeilenanzahl Write FZeilenanzahl;
  end;

.......

Sek.LoadFromFile(DreiSek);
    if Zeilenanzahl = Sek.Count -1 then exit;

gibt es eine Zuzgriffsverletzung.