Listenindex Überschreitet das Maximum (3)

[Matze]

Kann es an der save.txt liegen?

Delphi-Quellcode:

formoptionen.RGSymbol.ItemIndex:=strtoint(save[3]);
formoptionen.RGSymbolPosition.ItemIndex:=strtoint(save[4]);

Nachtrag: Du verwendest ausschließlich relative Pfade. Das ist sehr riskant, denn relative Pfade beziehen sich nicht auf dein Programmverzeichnis, sondern auf das aktuelle Arbeitsverzeichnis. Dieses ist häufig das Programmverzeichnis, aber nicht immer.

Wenn du aus deinem Programmverzeichnis Dateien öffnet möchtest, mache es so:
save.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'save.txt'); Das gleiche gilt für die Bitmaps.

Oder schreibe dir eine Funktion:

Delphi-Quellcode:

function AppPath: string;
begin
  Result := ExtractFilePath(ParamStr(0));
end;

und ermittle die absoluten Pfade wie folgt:
save.LoadFromFile(AppPath + 'save.txt');

[Demon666]

Ok danke der fehler ist jetzt behoben... und ein neuer ist aufgetreten.
Beim Schließen des Programms bekomme ich die Meldung ..."Zugriffsverletzung bei Adresse 00460985"... mit verweis auf die zeile If Formoptionen.CBleiste.Checked=false then in der prozedur Darstellunganpassen

[Matze]

Vergleiche auf "true" und "false" sollten auch vermieden werden, speziell der auf "true" (s. hier).

Rufst du die Prozedur "DarstellungAnpassen" denn beim Beenden auf (OnClose o.ä.)?
Ich vermute, du greifst auf "Formoptionen" zu, was bereits freigegeben wurde.

[Demon666]

Also beim schließen greif ich nicht dauf zu. Was meinst du mit "freigegeben"? (Bin Delphi neuling)

[Matze]

Beim Beenden gibt das Programm den reservierten Speicher frei, den es beansprucht hat. Dazu zählen auch Unterformulare.

Daher vermute ich, dass das Unterformular nicht mehr existiert, du aber beim Beenden darauf zugreifst.

Hast du denn etwas im OnClose oder OnCloseQuery stehen?

[Demon666]

nein, aber ich hab ne prozedur in der FormOptionen geschlossen wird:

Delphi-Quellcode:

procedure TFormOptionen.BtOKClick(Sender: TObject);
var save: Tstringlist; //hier wird gespeichert. reihenfolge: checkbox, buttonhöhe,buttonbreite,Radiogroup"Symbol",RadioGroup"SymbolPosition";
begin
  save:=tstringlist.create;
  if cbleiste.checked then
    save.add('t')
  else
    save.Add('f'); //wenn die checkbox ein häckchen hat ist die erste zeile von save=t  ansonsten ist sie f;


  if edbthoehe.text='' then
     edbthoehe.value:=0;

  if edbtbreite.text='' then
    edbtbreite.Value:=0;

  save.Add(inttostr(edbthoehe.Value)); //speicert die buttonhöhe;
  save.Add(inttostr(edbtbreite.value)); //speichert die buttonbreite;
  save.Add(inttostr(RGSymbol.ItemIndex));
  save.Add(inttostr(RGSymbolPosition.ItemIndex));
  save.SaveToFile('save.txt');
  FormOptionen.Close;
end;

[Matze]

Hm, also so kann ich dir leider nicht helfen, sorry.

Aber wo ich deinen Code nochmal ansehe, entstehen u.U. Speicherlecks (sog. Memory Leaks).
Du erzeugst eine StringList und gibst dessen Speicher nicht mehr frei.
Richtig macht man das so (bei allen Objekten, die du mit ".Create" erstellst):

Delphi-Quellcode:

save := TStringlist.Create;
try
  // hier dein Code, in dem du auf "save" zugreifst
finally
  // Speicher freigeben
  FreeAndNil(save);  // oder: save.Free;
end;

[himitsu]

Blos um das nochmal zu sagen.
Debuggen ist eine Wunderwaffe.
Damit bekommt man auch gleich mit raus in welcher Zeile der Fehler auftritt, was die Fehlersuche stark vereinfacht.