Spaltenweise auf TStringList zugreifen

[aaaaaaaaaa_10]

Mein TMomFiles hat kein OnCreate.

 MyTimer2.OnTimer := ZehnMinTimerEvent;

Zitat:

Oder dass du MomFiles manuell erzeugst und wieder freigibst?

Das ist meine TMomFiles Klasse:

Delphi-Quellcode:

type
 
  TMomFiles=class(TForm)
  private
   FZeilenanzahl : integer;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    procedure DreiSekDateiErstellen;
    procedure ZehnMinDateiErstellen;
    procedure DreiSekDateiFuellen(const Filename: string);
    procedure ZehnMinDateiFuellen(const Filename: string);
    procedure DreiSekTimerEvent(Sender: TObject);
    procedure ZehnMinTimerEvent(Sender: TObject);
    procedure WerteBerechnen;
    property Zeilenanzahl: Integer Read FZeilenanzahl Write FZeilenanzahl;
  end;