wpe35.gif (1006 bytes) jsFTPDlg

This is a feature-packed, resizable, configurable FTP dialog component. Instant FTP for your applications!

Example:

jsFTPDlg.Execute;  // displays the jsFTPDlg

wpe52.gif (20170 bytes)

type TjsFTPDlg = class(TComponent)
private
    FInitialLocalDir : String;
    FInitialRemoteDir : String;
    FWindowCaption : String;
    FDirectory : String;
    FDlgWidth : Integer;
    FDlgHeight : Integer;
    FServer : String;
    FUserID : String;
    FPassword : String;
    FFileAttributes : TFileAttributes;
    FLocalFileMask : String;
    FFileSortType : TFileSortType;
    FFont : TFont;
    FFileViewStyle : TFileViewStyle;
    FVisibleColumns : TVisibleColumns;
    FVisibleMenus : TVisibleMenus;
protected
    { Protected declarations }
public
    constructor Create(AOwner : TComponent); override;
    destructor Destroy; override;
    function Execute : Boolean;
published
    property FileAttributes : TFileAttributes read FFileAttributes write FFileAttributes;
    property LocalFileMask : String read FLocalFileMask write FLocalFileMask;
    property FileSortType : TFileSortType read FFileSortType write FFileSortType;
    property Font : TFont read FFont write FFont;
    property ViewStyle : TFileViewStyle read FFileViewStyle write FFileViewStyle;
    property VisibleColumns : TVisibleColumns read FVisibleColumns write FVisibleColumns;
    property VisibleMenus : TVisibleMenus read FVisibleMenus write FVisibleMenus;
    property DlgWidth : Integer read FDlgWidth write FDlgWidth;
    property DlgHeight: Integer read FDlgHeight write FDlgHeight;
    property InitialLocalDir: String read FInitialLocalDir write FInitialLocalDir;
    property InitialRemoteDir: String read FInitialRemoteDir write FInitialRemoteDir;
    property WindowCaption : String read FWindowCaption write FWindowCaption;
    property Server : String read FServer write FServer;
    property UserID : String read FUserID write FUserID;
    property Password : String read FPassword write FPassword;
end;