Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Na dann muss das wohl ein Fehler im Delphi 7 sein, ich hatte es mit XE getestet, hab hier leider kein Delphi 7.
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Also wenn du 3277 Zeilen hast und der letzte Eintrag bei 4275 liegt, kann man vermuten, dass zwischendrin auch schon paar fehlen?
Wir bleiben dabei, es gibt kein Zeilenlimit. Deine Datei scheint einfach nicht das herzugeben, was du erwartest und dabei können wir echt nicht helfen.
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
ReadSections ist es egal ob es den SektionNamen bereits gibt oder nicht. Es wird einfach jedes "" gezählt.
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Es hat sogar mit 9999999 funktioniert 8-)
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Hab mal nen kleinen Test gemacht. Showmessage bringt mir die erwarteten 4500.
procedure TForm26.Button1Click(Sender: TObject);
var
i : Integer;
s : TStringList;
begin
s := TStringList.Create;
for i := 1 to 4500 do
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Das liegt daran, dass Du Äpfel (Anzahl Zeilen=4500) mit Birnen (Anzahl Sektionen=3277) vergleichst.
Forum: Object-Pascal / Delphi-Language
by baumina,
26. Aug 2015
Zeig doch mal deine for-Schleife und sag uns den Fehler den du bekommst.