请教关于ftp的一个问题(100分)

各位大虾,我是新手,希望不吝赐教.^_^
我做了一个ftp客户端程序,界面上放了2个listview控件,左边的显示本地目录,右边的显示
服务器上的目录.我的问题是当我上传了一个文件后,怎样在远程文件列表中立刻就把这个
文件显示出来?我用过add方法,可是当我一换目录,刚加进去的文件名就会不见.

上传文件后要重新刷新一下远程目录列表。

我也试过,可是不成功

我列远程文件列表的过程是这样的:
procedure TFormMain.DisplayRemoteFile;
var
FindData: TWin32FindData;
begin
lvRemote.Enabled:=false;
Clearlistview(lvRemote);
lvRemote.Items.Clear;
lvRemote.Enabled:=true;
hFind := FtpFindFirstFile(hFtp,PChar(RemoteDir), FindData,0,0);
if assigned(hFind) then
try
repeat
If (string(FindData.cFileName) <> '.') and
(string(FindData.cFileName) <> '..')
then
AddNewFileItem(lvRemote.Items.Add, FindData);
until not(InternetFindNextFile(hFind, @FindData))
finally
SafeCloseHandle(hFind);
end;
end;

我应该怎么样把刷新加进去呢?

FtpFindFirstFile第四个参数dwFlags加上 INTERNET_FLAG_RELOAD
就会重新从服务器下载文件列表

加上后,有时可以,有时不行,很不稳定,是我程序本身的原因还是什么?

多人接受答案了。