Statt der vielen sQuelle hätte ich ein Zeichen (z.B. *) und dann Replace gemacht,
aber wozu erst zusammen und dann split, wenn man es auch gleich fertig haben kann.
Delphi-Quellcode:
AFiles: TArray<string>;
begin
AFiles := [sQuelle + '0174163013.pdf',
sQuelle + '0174163020.pdf',
sQuelle + '0174164010.pdf',
sQuelle + '0174164027.pdf',
sQuelle + '0174164034.pdf',
...
];
oder falls später stückchenweise, via Schleife und so.
Delphi-Quellcode:
AFiles := AFiles + [sQuelle + '0174163013.pdf'];
...
AFiles := AFiles + [sQuelle + '0174163020.pdf', sQuelle + '0174164010.pdf'];
...
Delphi-Quellcode:
M_Output.Lines.Add(AStr); // geht auch mit Zeilenumbrüchen drin (und auch unnötig erst ALLEN Text rauszuholen und wieder neu reinzuzun)
// und SelStart ist auch nicht nötig, weil macht Add schon