jsFTPListView

This is a completely configurable and Explorer-like FTP file list component. Use it in conjunction with jsFTP.

TjsFTPListView = class(TjsCustomFileListView)
private
    FFTPSource : TjsFTP;
    FStatusMsg : String;
    FOnStatusMsg : TNotifyEvent;
    function GetStatusMsg : String;
    procedure SetStatusMsg(sStatusMsg : String);
    function GetFTPSource : TjsFTP;
    procedure SetFTPSource(Value : TjsFTP);
    procedure ParseAndAddFTPFileInfo(sCommaDelimFileInfo : String);
protected
    procedure Loaded; override;
    procedure StoreCopyFileNames(Sender : TObject); override;
    procedure StoreCutFileNames(Sender : TObject); override;
    procedure SetFileMask(sFileMask : String); override;
    procedure Notification(AComponent : TComponent; Operation : TOperation); override;
    procedure PasteFiles(Sender : TObject); override;
    procedure DeleteFiles(Sender : TObject); override;
    procedure ReloadFileList(Sender : TObject); override;
public
    property StatusMsg : String read GetStatusMsg write SetStatusMsg;
    constructor Create(AOwner : TComponent); override;
    destructor Destroy; override;
published
    property OnStatusMsg : TNotifyEvent read FOnStatusMsg write FOnStatusMsg;
    property FTPsource : TjsFTP read GetFTPSource write SetFTPSource;
    property FileMask : String read GetFileMask write SetFileMask;
    property VisibleColumns : TVisibleColumns read GetVisibleColumns write SetVisibleColumns;
    property VisibleMenus : TVisibleMenus read GetVisibleMenus write SetVisibleMenus;
    property FileAttributes : TFileAttributes read GetFileAttributes write SetFileAttributes;
    property FileSortType : TFileSortType read GetFileSortType write SetFileSortType;
    property FileDateFormat : TDateFormat read FFileDateFormat write FFileDateFormat;
    property OnDirChange : TNotifyEvent read FOnDirChange write FOnDirChange;
    property Directory : String read GetDirectory write SetDirectory;
    property FileName : String read GetFileName;
    property Align;
    property BorderStyle;
    property Color;
    property OnClick;
    property OnDblClick;
    property Columns;
    property Ctl3D;
    property DragMode;
    property Enabled;
    property Font;
    property GridLines;
    property HideSelection;
    property HotTrack;
    property MultiSelect;
    property RowSelect;
    property OnChange;
    property OnChanging;
    property OnColumnClick;
    property OnDeletion;
    property OnEnter;
    property OnExit;
    property OnInsert;
    property OnDragDrop;
    property OnDragOver;
    property DragCursor;
    property OnStartDrag;
    property OnEndDrag;
    property OnMouseDown;
    property OnMouseMove;
    property OnMouseUp;
    property ParentColor default False;
    property ParentFont;
    property ParentShowHint;
    property ShowHint;
    property ShowColumnHeaders;
    property TabOrder;
    property TabStop default True;
    property Visible;
    property OnKeyDown;
    property OnKeyPress;
    property OnKeyUp;
end;