ich unterhalt mich zwar die ganze Zeit mir selbst, aber egal....
aber nun stehe ich vor dem nächsten Problem.
in die Listview etwas einfügen habe ich so gemacht:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
i: integer;
begin
if opendialog1.Execute then begin
Listview1.Clear;
for i := 0 to Opendialog1.Files.Count - 1 do begin
Listview1.Items.Add;
Listview1.Items[i].Caption := Opendialog1.Files[i];
end;
end;
end;
aber wenn ich was ergänzen, also unten anhängen will, dann komme ich mit folgendem Code nicht weiter
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
if opendialog1.Execute then begin
for i := 0 to Opendialog1.Files.Count - 1 do begin
Listview1.Items.Add;
Listview1.Items[Listview1.Items.Count + i].Caption := Opendialog1.Files[i];
end;
end;
end;
kann mir jemand sagen, wie man das richtigerweise macht, oder wo mein Denkfehler liegt.
Laufe auf einen Zugriffsfehler, wenn ich es so angehe.