Dateitypen mit Idftp herausfinden

[Lamy]

G'nAbend!

Ich möchte gerne den Dateitypen eines in meiner Listview aktivierten Items in meinem Label1 anzeigen lassen:

Delphi-Quellcode:

      Form1.Label1.Caption :=  'Dateityp : 'Verbindung.FTP.DirectoryListing.Items[Form1.Ftpbrowser.selected.Index].ItemType ;

Dummerweise ist der Typ nicht kompatibel zu Strings.

Wie kann ich das umwandeln?
Dankööö schonmal!

Lamy

[mirage228]

Von welchem Typ ist ItemType?

Falls es eine Enumeration ist kannst du mit GetEnumName(TypeInfo(TItemType), Integer('Verbindung.FTP.DirectoryListing.Items[Form1.Ftpbrowser.selected.Index].ItemType)) den String dazu erhalten.

Musst halt noch schauen, ob der wirklich TItemType heisst.

Edit: PS: Unit TypInfo einbinden. ;)

mfG
mirage228

[Lamy]

Ah, danke!

Allerdings kann der nix mit TItemType anfangen...

[P.S.: Es ist der Typ TIdiritemtype, aber das ist doch das gleich in grün, oder?
:stupid: ]

[Benedikt]

Hi,

ItemType ist vom Typ TIdDirItemType und liefert nur zurück, ob ein Item ein Verzeichnis (ditDirectory), eine Datei (ditFile) oder ein Link (ditSymbolicLink) ist.

Um den Dateityp herauszubekommen kannst du höchstens die Datei-Endung der Datei (ExtractFileExt) benutzen, die das jeweilige Item hat.

Delphi-Quellcode:

Form1.Label1.Caption:='Dateityp: '+ExtractFileExt(Verbindung.FTP.DirectoryListing.Items[Form1.Ftpbrowser.Selected.Index].FileName);

[Lamy]

Wieder was gelernt;
Damit hast du mir gleich zweimal geholfen!!!

Danke sehr!


Lamy