Problem mit Zugriffsverletzungen bei einer TStringList

[Muetze1]

Zitat von _frank_:

erstelle die Instanzen einfach im form.OnCreate

Delphi-Quellcode:

for i:=1 to 11 do
begin
  cpuliste[i].create;
  //laden vielleicht???
  cpuliste[i].LoadFromFile(...);
end;

Oh, Spezial-Delphi oder warum sehen deine Constructoren so komisch aus? Ich würde lieber folgendes empfehlen:

  cpuliste[i] := TStringList.Create; /EDIT: Und schwupps, schon wurde es richtig (falsch) abgeschrieben...

Zitat von guitar1:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var i : integer;
begin

  createdir(ExtractFilePath(ParamStr(0))+'/mb');

  for I := 1 to 11 do begin
    Mainboardliste1[i].Create;
  end;

   mainboardliste1[ 1].LoadFromFile(ExtractFilePath(ParamStr(0))+'/mb/herst.txt');
...
   mainboardliste1[11].LoadFromFile(ExtractFilePath(ParamStr(0))+'/mb/preis.txt');

end;

Lieber so:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var i : integer;
begin

  createdir(ExtractFilePath(ParamStr(0))+'/mb');

  for I := 1 to 11 do 
    Mainboardliste1[i] := TStringList.Create;

   mainboardliste1[ 1].LoadFromFile(ExtractFilePath(ParamStr(0))+'/mb/herst.txt');
...
   mainboardliste1[11].LoadFromFile(ExtractFilePath(ParamStr(0))+'/mb/preis.txt');

end;