[TidFtp] Problème avec les FTP List Parse
Bonjour,
Je suis en indy 10 et delphi 7 et j'utilise le Client FTP.
Tout fonctionne bien pour récupérer les noms des fichiers en faisant un List() et j'ai inclus IdFTPListParseVMS dans ma form pour que le Directorylisting fonctionne.
Mon problème est que mon serveur FTP fonctionne sous VMS (d'ou le IdFTPListParseVMS), de ce fait pour récupérer la taille des fichiers je ne peux pas utiliser Size du TidFTPListItem mais je dois utiliser NumberBlocks propriété de la class TIdVMSFTPListItem qui se trouve dans la unit IdFTPListParseVMS or je ne comprends pas comment pouvoir utiliser les class de cette unit sachant DirectoryListing renvoie des TidFTPListItem et que TIdVMSFTPListItem descend de cette classe.
Basiquement, j'amerais faire quelque chose dans ce genre là:
Code:
1
2
3
4
5
6
7
8
9
10
|
FTP1.List(FicFTP,'*.*',True);
for i:=0 to Fic1.Count-1 do
begin
//OK
Rep[i].Nom:=FTP1.DirectoryListing.Items[i].FileName;
//Pas OK
Rep[i].NbBlocs:=TIdVMSFTPListItem(FTP1.DirectoryListing.Items[i]).NumberBlocks;
Rep[i].TailleBloc:=TIdVMSFTPListItem(FTP1.DirectoryListing.Items[i]).BlockSize;
end; |
Si quelqu'un a déjà employé des types particuliers de parser pour idFTP, j'aurais vraiment besoin d'un coup de main car j'ai beau chercher et je n'ai trouvé aucun exemple d'utilisation de IdFTPListParsexxxx... spécifique genre IdFTPListParseWindowsNT ou IdFTPListParseUnix ou IdFTPListParseOS2 par exemple qui peuvent avoir la même problématique.
Merci.
Phil.
