Forum: Sonstige Fragen zu Delphi
Delphi
by Bummi,
23. Jun 2012
Deinen Code selbst als Müll zu bezeichnen klingt als ob Du die eine oder andere Antwort als Angriff verstanden haben könntest, gemeint war sicher keine so.
Um Erbsen zu zählen ....
Ich würde das Erzeugen von sl1 und sl2 direkt nach LogInIni := TIniFile.Create(LogIns);
einfügen und im Anschluss das TRY "öffnen"
Forum: Sonstige Fragen zu Delphi
Delphi
by Bummi,
23. Jun 2012
statt mit Schleifen über z.B. ein den String zusammenzubasteln, was schief geht wenn z.B. "ein" kürzer wäre als erwartet könntest Du Dir mal COPY anschauen ...
Forum: Sonstige Fragen zu Delphi
Delphi
by Bummi,
23. Jun 2012
1. LogInini wird gar nicht garantiert erzeugt
2. Logini wird wenn sie erzeugt wurde zumindest wieder freigegeben
ein Zugriff darauf ist also gar nicht zulässig
3. hier greifst du auf Items außerhalb der Liste zu
for I := 0 to hLogInFenster.cbLogIns.Items.Count - 1 do
if hLogInFenster.cbLogIns.Items = hLogInFenster.cbLogIns.Items
Forum: Sonstige Fragen zu Delphi
Delphi
by Bummi,
23. Jun 2012
for I := 0 to sl1.Count -1 do
begin
LogInIni.ReadSectionValues(sl1, sl2);
Anzahl := Anzahl + sl2.count;
end;