Hallo danku,
warum erhöhst du die Zeilenzahl des Grids bei jedem Durchlauf? Du kennst doch die Anzahl der ausgewählten Dateien und kannst somit die Zeilenzahl
vor der Schleife setzen:
Delphi-Quellcode:
// 1 Headerzeile + 1 Zeile pro ausgewählter Datei
sgfiles.RowCount := OpenDialog1.Files.Count + 1;
// Füllen des StringGrids mit den Namen der ausgewählten Dateien
for i := 0 to OpenDialog1.Files.Count - 1 do
sgfiles.Cells[0, 1 + i] := OpenDialog1.Files[i];
PS: Pushen von Beiträgen frühestens nach 24 Stunden
//Edit: ich sehe gerade, daß ein Logikfehler in deinem Code vorliegt. Die FOR-Schleife überträgt nur alle Dateien, danach erhöhst du evtl. die Zeilenzahl im Grid um 1. Die Einrückung läßt vermuten, daß ein BEGIN fehlt. Die Zeilenzahl solltest du trotzdem vor der Schleife setzen.
Gruß Hawkeye