Forum: Programmieren allgemein
Delphi
by Dalai,
1. Mär 2013
Jeder Aufruf von ReadSection(s) leert die Liste, ja. Damit spart man sich das Clear (deswegen schrieb ich ja "sofern nötig"). Dennoch ist das wiederholte Erzeugen der Listen innerhalb der Schleife unnötig und verursacht Speicherlecks, zumal es überhaupt kein zugehöriges sl.Free gibt.
MfG Dalai
Forum: Programmieren allgemein
Delphi
by Dalai,
1. Mär 2013
Naja, kann man machen, aber es gibt auch so schicke Komponenten, in die man Stringlisten speichern lassen kann. Für eine Testausgabe ist es sicher benutzbar. Dennoch kann man auf den Punkt der hartkodierten Pfade nicht oft genug hinweisen. Selbst heutzutage sehe ich noch Software, die hartkodierte Pfade nutzt, die Adminrechte voraussetzt oder ähnliche Geschichten. Das kotzt mich aus...
Forum: Programmieren allgemein
Delphi
by Dalai,
1. Mär 2013
Das ist doch nicht das Problem, sondern das hier:for i := 0 to inilist.Count-1 do
begin
ini := TIniFile.Create(inilist.Strings);
Sektionen := TStringList.Create;
Abschnitte := TStringList.Create;
Schlüssel := TStringlist.Create;
Werte := TStringList.Create;
Sektionen.SaveToFile ('C:\Users\admin\Desktop\aTest\Sektionen.txt');
Abschnitte.SaveToFile...
Forum: Programmieren allgemein
Delphi
by Dalai,
1. Mär 2013
Und wo ist die Änderung, die Stringlisten vor der Schleife zu erzeugen? Du hast da lustige Speicherlecks.
PS: Die hartkodierten Pfade lässt du am besten auch gleich weg.
MfG Dalai