Не могу получить список имен содержимого каталога на FTP сервере.

[Andrew I]

AnsiString ftpPath;
TStringList *st=new TStringList();
st->LoadFromFile(programPath+"\\netconfig.txt");

NMFTP1->Host=st->Strings[0];
NMFTP1->Port =(st->Strings[1]).ToInt();
NMFTP1->UserID=st->Strings[2];
NMFTP1->Password=st->Strings[3];
ftpPath=st->Strings[4];

NMFTP1->Connect();
if (NMFTP1->Connected)
{

AnsiString curFtpDir;
curFtpDir=NMFTP1->CurrentDir;

curFtpDir=curFtpDir+ftpPath;
NMFTP1->ChangeDir(curFtpDir);

TFTPDirectoryList *dl;
dl=NMFTP1->FTPDirectoryList;

TStringList *slFTP=new TStringList();
slFTP=dl->name;//На этой строке вылетает

NMFTP1->Disconnect();
}
else MessageBox(NULL, "не удалось установить соединение", "Соединение", MB_OK);

Соединение с ftp устанавливается, каталог указанный в параметре на сервере существует,запись его правильная (проверял просматривая CurrentDir после смены каталога ChangeDir() ).Но на строке slFTP=dl->name в которой я пытаюсь получить список имен содержимого каталога на сервере вылетает с Debugger Exception Notification:

Project такой-то raised exception class EAccessViolation with message ‘Access violation at address 004030C4 in modul такой-то.Read address 00000008’.Process stopped.Use Step or Run to continue.

В чем дело?