Hi,
ich habe da mal ne Frage zu deinem Quellcode:
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:
| for a := 0 to (box_file.Items.Count - 1) do begin if box_file.Selected[a] = true then begin dateien.Add(box_file.Items[a]); end; try NMFTP.Upload(dateien.Text[i],''); except end; end; |
Was soll den 'dateien' für ein Typ sein?.
Um jetzt die Dateien, die in den 'dateien' gespeichert sin, hochzuladen, brauchst du davor noch ne for..to..do-Schleife.
Quelltext
1: 2: 3: 4:
| for i := 0 to dateien.count -1 do begin NMFTP.Upload(dateien.Text[i],''); end; |
So müsste das funzten. - Hoffe ich
-