FTP Client

[Luckie]

Die Eigenschaft Items ist vom Typ TStrings. Aber warum kuckt ihr in der Hilfe nicht einfach mal unter TListview mal nach?

[Lamy]

Was soll mir das denn offenbaren?

[Luckie]

Wie man mit der Eigenschaft [/b]Items[b] vom Listview umgeht?

[Neuni]

Toll, aber irgendwie finde ich das auch nicht so richtig super erklärt da

Weißt es hier denn keiner...ein Mensch, der es einem erklären kann, ist im gegensatz zu ner Hilfe etwas besser, oder?

[alcaeus]

Delphi-Quellcode:

for i := 1 to DateiListe.Items.Count do
  with ListView1.Items.Add do
    Caption := DateiListe.Strings[i-1];

DateiListe ist vom Typ TStrings, ListView vom Typ TListView, ich hoffe das hilft euch weiter

[Benedikt]

Zitat von Luckie:

Die Eigenschaft Items ist vom Typ TStrings

Allerdings nicht beim Listview, nur bei der ListBox.
Beim Listview ist die Items-Property vom Typ TListItems, die einzelnen Items vom Typ TListItem

[alcaeus]

Zitat von Benedikt:

Zitat von Luckie:

Die Eigenschaft Items ist vom Typ TStrings

Allerdings nicht beim Listview, nur bei der ListBox.
Beim Listview ist die Items-Property vom Typ TListItems, die einzelnen Items vom Typ TListItem

Deshalb habe ich ja auch einen schönen Code gepostet, der dein Problem ziemlich schnell lösen könnte. Du kannst die Elemente zwar nicht alle auf einmal in die Listview setzen, aber in einer Schleife geht das auch noch schnell genug.

[Lamy]

So langsam wirds mir peinlich...

Ich steh da wie'n Ochs vorm Berg, so weit hab ichs nu übertragen:

Delphi-Quellcode:

PROCEDURE TForm3.Ftpverzeichnis(DirName: STRING);
VAR
  stringliste: TStringList;
  i: Integer;
BEGIN
  Stringliste := TStringList.Create; // Stringliste erzeugen
  TRY
    IdFTP1.ChangeDir(DirName);
    Form1.EDftpverzeichnis.Text := IdFTP1.RetrieveCurrentDir; // Aktuelles Verzeichnis in die Combobox zur Verzeichnisauswahl schreiben

    Form1.Listftpdir.Items.Clear; // Verzeichnisanzeige leeren
    IdFTP1.List(Stringliste);
    Form1.Listftpdir.Items.Assign(Stringliste);
////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////
   

 FOR i := 1 TO Form1.Listftpdir.Items.Count DO
      WITH Form1.Listftpdir.Items.Add DO
        Caption := Stringliste.Strings[i - 1];


////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////

  FINALLY
    Stringliste.Free;
  END;

END;

So hab ichs eingebunden:

Delphi-Quellcode:

      IF Idftp1.Connected THEN
        ChangeDir(idftp1.RetrieveCurrentDir);

Watt mach ich da mal wieder falsch?
*nix kapiert*
Was macht dein Code eigentlich GENAU?

[Lamy]

Hm, weiß es keiner oder belästige ich euch einfach nur zu sehr?

[alcaeus]

Zitat von Neuni:

Theorie is nicht gleich Praxis...

Der Server sendet strings, die dann ankommen, aber das ListView verlangt Items...Also geht das nicht "so" einfach

Das war die letzte Frage die gestellt wurde, und du (Lamy) fragtest dann, was dir die Hilfe offenbaren soll (Ich hab zwar nicht geschaut, aber da ist sicher ein Beispiel drinnen). Aber naja, ich habe mal 3 Zeilen Code geschrieben, um dir zu helfen. Hier ist was du eingefügt hast:

Delphi-Quellcode:

FOR i := 1 TO Form1.Listftpdir.Items.Count DO
  WITH Form1.Listftpdir.Items.Add DO
    Caption := Stringliste.Strings[i - 1];

Und hier ist, was ich gepostet/erklärt habe.

Zitat von alcaeus:

Delphi-Quellcode:

for i := 1 to DateiListe.Items.Count do
  with ListView1.Items.Add do
    Caption := DateiListe.Strings[i-1];

DateiListe ist vom Typ TStrings, ListView1 vom Typ TListView, ich hoffe das hilft euch weiter

Beachte die letzte Zeile mit Erklärungen. Ich sagte, DateiListe ist TStrings, ListView1 vom Typ TListView. Wie kommst du dann darauf, Listftpdir als TStrings und als TListView-Element zu verwenden? Also wenn du Mehrfachvererbung in Delphi jetzt wirklich gemacht hast, dann sag mir wie und warum. Ich gehe davon aus, dass Stringliste die Texte enthält, und Listftpdir die ListView ist, also muss dein Code so aussehen:

Delphi-Quellcode:

FOR i := 1 TO Stringliste.Count DO
  WITH Form1.Listftpdir.Items.Add DO
    Caption := Stringliste.Strings[i - 1];

Ich hoffe, diesmal habe ich Copy & Waste leicht genug gemacht

PS:Was versuchst du damit zu erreichen?
Form1.Listftpdir.Items.Assign(Stringliste);