Listenindex Überschreitet das Maximum (3)

[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;

[SirThornberry]

Mache bitte für den neuen Fehler ein eigenes Thema auf. Denn der neue Fehler hat rein gar nichts mit dem vorherigen Fehler zu tun.
Im neuen Thema kannst du ja auf den Quelltext von diesem Beitrag verlinken.
Aber so bringt es für die Zukunft recht wenig weil andere mit gleichem Problem die zweite Frage innerhalb dieser ersten Frage kaum finden werden.

[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.