fejl med nmftp

Tags:    delphi

Jeg har nogen problemer med at liste alle filer på en ftp via nmftp, min kode er denne:

procedure TfrmMain.ftpSuccess(Trans_Type: TCmdType);
var
NewItem: TListItem;
I: integer;
begin

For I := 0 to ftp.FTPDirectoryList.name.Count - 1 do
begin
NewItem := lstRight.Items.Add;
NewItem.Caption := ftp.FTPDirectoryList.name[I];
lstRight.Items.AddItem(NewItem,I);



end;
end;

Fejlene ligger ved "For I := 0 to...." og ved "NewItem.Caption :=..."

mvh.
Lasse Espeholt
webmaster for espeholt.dk



3 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
Sorter efter stemmer Sorter efter dato
Jeg har nogen problemer med at liste alle filer på en ftp via nmftp, min kode er denne:

procedure TfrmMain.ftpSuccess(Trans_Type: TCmdType);
var
NewItem: TListItem;
I: integer;
begin

For I := 0 to ftp.FTPDirectoryList.name.Count - 1 do
begin
NewItem := lstRight.Items.Add;
NewItem.Caption := ftp.FTPDirectoryList.name[I];
lstRight.Items.AddItem(NewItem,I);



end;
end;

Fejlene ligger ved "For I := 0 to...." og ved "NewItem.Caption :=..."

mvh.
Lasse Espeholt
webmaster for espeholt.dk

Du kunne jo starte med at post e hvilke fejl du får :)
-
neuroman? det' da mig :D
Aloha - Er du fresh???



hmm Access Vilation, er ikke stavet korrekt



Lukker



t