TSTringList und TSaveDialog

[bembulak]

Hallo Leute!

Ich habe schon wieder ein Problem und bitte um eure Hilfe!
Bei noch dem gleichen Programm wie gestern (danke an Christian) versuche ich, Daten aus einer ListBox an eine StringList zu übergeben und diese dann zu speichern. Der Pfad dazu kommt aus einem SaveDialog.
Nun ist es so, dass mir das Programm bei jedem zweiten Start abschmiert und ich wiedermal ratlos bin.
Hier die Prozedur:

Code: Alles auswählen

procedure TForm1.Button4Click(Sender: TObject);
var
   i, anzahl : Integer;
begin
   anzahl := ListBox1.Items.Count;
 
   for i := 1 to anzahl do
   begin
        sList.Append(ListBox1.Items.Strings[i-1]);
   end;
 
   try
   if SaveDialog1.Execute then
      sList.SaveToFile(SaveDialog1.FileName);
   except
      ShowMessage('Fehler beim Speichern der Datei!');
   end;
 
   Edit1.SetFocus;
end;

Wenn ich das Programm starte, kriege ich folgenden Fehler in Form einer MessageBox:

Error
Project raised execption call 'External: SIGSEGV'.

Wenn das Programm läuft, ist der Button, welcher die Prozedur aufruft (Button 4) nicht mehr zu sehen. Das Programm hängt. Die Datei wurde nicht gespeichert.

Die Meldung ist für mich sehr kryptisch. Wäre froh, wenn mir wieder jemand einen Tip geben könnte. Danke!

[af0815]

Ohne Debugger, von der Kommandozeile aus gestartet, läuft es ?!

[bembulak]

Oh!
Gerade getestet. Ja, von CMD aus funktioniert es. Die Datei wird erstellt (mit richtigen Einträgen) und Programm läuft weiter. Kein Absturz, kein Hänger, alles bestens.

Danke für den Hinweis!

Gibt es irgendeinen Hinweis, wie man die Meldung wegbekommt, oder wo Lazarus stolpert?

[af0815]

In der neuen Version (svn) habe ich die Probleme nicht mehr gesehen. Deshalb auch die Frage.

[bembulak]

Hm, vielleicht sollte ich mir das mal ansehen. Eigentlich mag ich die SVN Sachen generell nicht so. Und wenn man sich gerade in eine Software einarbeitet ist es schwer, zu erkennen, ob man selber den Fehler gemacht hat, oder die Software buggy ist. Ich bin bei 0.9.24 eigentlich davon ausgegangen, dass es halbwegs stabil läuft.

Aber einen Blick ist es wert. Danke für den Hinweis.

edit: kann man eine neuere Version installieren, ohne vorher die alte zu löschen und die Config zu verlieren? Ich müsste einige Pakete wieder neu installieren, die Hilfe, die Farben anpassen, usw...

[Christian]

sichere alle .xml auf dem Lazarus verzeichnis (keine Unterverzeichnisse) und die staticpackages.inc, installiere den snapshot ins selbe verzeichnis (nachdem du den inhalt gelöscht hast) und kopiere die gesicherten dateien hinterher wieder rein.