Dateien auf FTP Server in Listview darstellen

[Sharky]

Schau Dir mal dieses Beispiel von mir an:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  new_Column : TListColumn;
begin
  ListView1.ViewStyle := vsReport;
  ListView1.Items.Clear;
  ListView1.Columns.Clear;
  ListView1.Font.Name := 'Courier New';
  new_Column := ListView1.Columns.Add;
  new_Column.Caption := 'Eintrag';
  new_Column.Width := -1;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  sl: TStringList;
  ndx: Integer;
  item: TListItem;
begin
  with IdFTP1 do
  begin
    Username := 'test';
    Password := 'test';
    Host := 'localhost';
    Connect;
    sl := TStringList.Create;
    try
      List(sl);
      for ndx := 0 to Pred(sl.Count) do
      begin
        item := ListView1.Items.Add;
        item.Caption := sl.Strings[ndx];
      end;
    finally
      sl.Free;
    end;
  end;
end;

Damit solltest Du auf jeden Fall weiter kommen.

[ehem. Benutzer]

hm ich glaub ich bin zu blöd dafür

erstens kennt er das nicht: item: TListItem;
also das TListItem kennt er nicht

und 2. ordne ich ja wieder eine Stringlist einem Listitem zu und das geht nicht...




MfG



Edit: Es geht, sry, habs hinbekommen.

[ehem. Benutzer]

Eine Frage noch:
Wenn ich das was bei dir in OnCreate steht weglasse und die Eigenschaft vom ListView auf
vsReport stelle, zeigt mir das Listview keinen Inhaltm nur eine Scrollbar erscheint,
nehme ich es so wie du es hast, geht es einwandfrei...



MfG

[Luckie]

So bald du einen Listview auf deiner Form hast, sollte er TListItem kennen.

[ehem. Benutzer]

Ich habe aber für das Verbinden eine extra Form, kann man das irgendwie einbinden?
Gibt es eine Möglichkeit das vsReport zu benutzen?
Also so, das man nicht alle Columns selber schreiben muss und automatisch das Icon
der Datei angezeigt wird.



MfG

[ehem. Benutzer]

*push*

[Sharky]

Hai ,

wo ist denn jetzt das Problem? Das ich in meinem Demo die Spalten zur Laufzeit erzeugt habe dürfte ja wohl kein Problem sein.

Zitat:

...und automatisch das Icon der Datei angezeigt wird....

Mit automatisch ist da nichts. Darum musst Du dich schon selber kümmern. Wie man das Icon einer Datei ermittelt sollte hier im Forum zu finden sein.

[ehem. Benutzer]

Also funktioniert vsReport nicht bei idFTP ?



MfG

[Luckie]

Doch, du musst ihn nur von Hand füllen.