Hi,
mein Freund hat mir gerade folgenden Code gegeben:
Delphi-Quellcode:
function Anzahl : Integer;
var loc : TStringlist;
i : Integer;
begin
loc := TStringlist.Create;
try
loc.LoadFromFile('
dc.loc');
SetLength(Datei,Loc.Count);
for i := 1
to Loc.Count
do begin
Datei[i] := TDatei.Create;
end;
Result := loc.Count;
finally
loc.Free;
end;
end;
ich hab zu ihm gesagt, das da nen Bock drinne ist. Es müsste nämlich
for I := 0 to SL.Count - 1 do heißen.
Er sagte mir dazu noch dies:
Zitat:
Count gibt die Anzahl der reihen
So und ich will soviele dateien erzeugen wie es Zeilen gibt ...
Count fängt ist bei einer Zeile = 1
Count ist bei zwei Zeilen = 2
usw...
Jede Zeile ist eine Datei.
Ich sagte ihm das es falsch ist.
Zeile 1 = Count 0;
Zeile 2 = Count 1;
Jetzt wollte ich wissen, was nun richtig?