mehrere Dateien über multiselect öffnen

infomio · Beiträge: 110 Win xy

Hallo ihr,

ich glaub ich stell mich mal wieder an...

Also. OpenDialog, Multiselect = True.

Jetzt will ich einen Datei nach der anderen abarbeiten, die der user ausgewählt hat. über OpenDialog.Files.Count krieg ich die richtige Anzahl raus. Aber über LoadFromFile(OpenDialog.Filename) öffnet der mir nur die letzte Datei!!! ????

Weiß des jemand??? :shock:

teebee · Beiträge: 109 D6 Prof

Du musst Dich mit einer Schleife durch die Eigenschaft 'Files' arbeiten:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:

With OpenDialog Do 
  For i := 0 to Files.Count-1 Do Begin
    // erst einen Container erzeugen
    MyFile[i] := TStringList.Create; 
    // dann File laden
    MyFile[i].LoadFromFile(Files[i]);
  End;

(Ohne Fehlerbehandlung)

Ungetestet, sollte zumindest ein Ansatz sein...

mfg, teebee

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme