Problem mit String und TStrings

[Andreas L.]

Delphi-Quellcode:

var
  i: Integer;
begin
  for i := 0 to OpenDialog1.Files.Count -1 do
    ListBox1.Items.Add(ExtractFilePath(OpenDialog1.Files[i]) + form2.durchnummerieren.text);
end;

Ist es das was du machen willst?