takaさん、ryochanさん、お世話になりました。

ryochanさんがおっしゃる様に、下記のような方法でもやってみたのですが
＞
＞あとftp32.dllはunlha32.dllと同じく
＞ftpコマンドを引数に使用させる方法が
＞あるので、そちらを使った方が楽です。
＞-aとすれば、
＞
どうもうまく行かなかったので、過程を見る為に分解してやってみたのです。
この方がどこでエラーになったかわかりやすいのでこのままでいいか、と。

で、結局FtpOpenArchive()の戻り値が構造体のようなものに戻している様だったので
なんでも使える便利な変数型anyを使ってやっちゃいました。以下のような感じです。
----------------------------------------------------------------
//ＦＴＰ転送
Long ll_hwnd, rtn
Any lany_rtn
lany_rtn = FtpOpenArchive(ll_hWnd , remote_dirname, 0)
ret = FtpAdd(ia_close, ls_cmdline, local_pathname, ll_size )
lany_rtn = FtpCloseArchive (lany_rtn)
----------------------------------------------------------------
私の場合、FtpAdd()の戻り値を使おうとしていたのがそもそもの間違いだったのですね。
ようやくＤＯＳ画面の要らないＦＴＰ転送が実現しました。
Timerイベントを使った終了確認も要らなくなってシンプルになりました。

皆様、どうもありがとうございました。