Umwandlung TStrings in Integer

[DeddyH]

Also, bei mir geht das hier:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var F: TStringList;
    integerarray: array of integer;
    i: integer;
begin
  F := TStringList.Create;
  try
    F.Add('1');
    F.Add('2');
    F.Add('3');
    F.Add('4');
    F.Add('5');
    F.Add('6');
    F.Add('7');
    F.Add('8');
    F.Add('9');
    F.Add('10');
    SetLength(integerarray,F.Count);
    for i := 0 to F.Count - 1 do
      integerarray[i] := StrToInt(F[i]);
    for i := 0 to Length(integerarray) - 1 do
      ShowMessage(Format('%d hat den Wert %d',[i,integerarray[i]]));
  finally
    FreeAndNil(F);
  end;
end;