La funcion, descrita mas abajo, trabaja perfecta *pero* necesito añadirle ese progressbar.
Code: Select all
lGetTransfer := FTPGETFILE( hConnect, cFileInServer, cLocalFile, 0, FILE_ATTRIBUTE_ARCHIVE, 0, 0 )
George
Code: Select all
lGetTransfer := FTPGETFILE( hConnect, cFileInServer, cLocalFile, 0, FILE_ATTRIBUTE_ARCHIVE, 0, 0 )