Page 1 of 1

Sysutils.FindFirst is not working?

Posted: Fri Nov 29, 2019 2:21 pm
by nekosquirrel
Sorry , I reported this at WingFTP server section by mistake,reposting here.


Hello

1. What is wrong with this script?
It just shows "Start", doesn't show "Exit" and "0".

2. "rfScriptEnv, System, Classes, Sysutils " are the only units that can be used in FtpRush scripts?

FtpRush 2.2.0 / win 8.1 /x64

Thanks

//----------------
uses
rfScriptEnv, System, Classes, Sysutils ;

Var Info : TSearchRec;
Count : Longint;

Begin
ShowMessage('Start');
count := Sysutils.FindFirst('*.*',faAnyFile and faDirectory ,Info);
ShowMessage('Exit');
ShowMessage(IntToStr(count));
End