Hi,
ich habe mir nun folgenden Code zusammengeschrieben:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
sFile, sPath: String;
begin
if OpenDialog.Execute then
for i := 0 to OpenDialog.Files.Count-1 do
begin
sFile := ExtractFileName(OpenDialog.Files[i]);
ListView1.AddItem(sFile , ListView1.Column[0]);
sPath := ExtractFilePath(OpenDialog.Files[i]);
ListView1.AddItem(sPath , ListView1.Column[1]);
end;
end;
Ich habe nun vor den Pfad der ausgewählten Dateien in Spalte 2 einzufügen, dies hab ich mit ListView1.Column[1] versucht, aber das klappt nicht... was mache ich falsch??
Danke für eure Hilfe!
Greetz
Dash