Cześć
Wracam jeszcze raz z powyżym pytaniem - spędza mi to sen z oczu :(
Przeanalizowałem linia po linii swój kod i trafiłem gdzie jest problem.
Poniżej kawałek kodu:
if IdFTP_lista.Connected then
try
label1.Caption:= 'pobieranie listy plików...'
Application.ProcessMessages;
IdFTP_lista.TransferType:= ftASCII;
IdFTP_lista.ChangeDir('/katalog');
{ pobiera listę plików - W tym miejscu jest dobrze bo sprawdziłem
zapisując tą listę do pliku txt , i było więcej niż jedna sapacja w pliku }
IdFTP_lista.List(lista);
//POBRANIE LISTY PLIKÓW DO TABLICY - gdzie mogę sortować wg. potrzeb
for y:= 0 to IdFTP_lista.DirectoryListing.Count - 1 do
begin
//tu pobieram same pliki pomijając katalogi...
if IdFTP_lista.DirectoryListing.Items[y].ItemType <> ditDirectory then
begin
{i tu jest błąd ! FileName skraca nazwę gdy pojawi się więcej niż jedna
spacja pomiędzy literami w nazwie pliku}
Tablica[lp].Nazwa:= IdFTP_lista.DirectoryListing.Items[y].FileName;
Tablica[lp].Rozmiar:= FormatFloat('#,##',IdFTP_lista.DirectoryListing.Items[y].Size);
Tablica[lp].Data:= FormatDateTime('dd/mm/yyyy hh:mm',IdFTP_lista.DirectoryListing.Items[y].ModifiedDate);
end;
end;
//itd.....
A więc błąd jest po stronie IdFTP_lista.DirectoryListing.Items[y].FileName;
Pytanie - czy jest jakaś opcja dla IdFTP_lista.DirectoryListing. ?
aby wyświetlał nazwy w oryginale ? lub inny sposób ?