WebDAV Delphi component is a non-visual Delphi component that allows you to change, create or move files on the server through the WebDAV protocol using Delphi.

Note, since there are many WebDAV server implementations, price of the component includes adopting it to a server of your choice, if needed.

In very rare cases for users of Delphi 10 Seattle and older Delphi versions, the component may have trouble connecting to a web server secured with SSL (https). That is due to the issues with earlier Indy versions. If this happens, please download and use the following Indy version: IndyFromD102.zip.

Features

• Create and edit folders
• Upload, update and download files
• Move and copy files between folders
• Rename and delete files
• Get extensive info about objects
• Encrypt / decrypt files with a password
• Share files and folders (via OCS Share API). Works on ownCloud and Nextcloud platforms
• Access to XML code for each object info
• Unicode support for all text fields
• Proxy servers support

Examples

Connecting to the service and showing list of items in TreeView.

Var
  FObject, FRootObject: TWDObject;
  CurNode: TTreeNode;
  I: Integer;
Begin
  WebDAV := TWebDAV.Create;
  WebDAV.BaseURL := 'https://somewebdavservice.com/somewebdavpath';
  WebDAV.Username := 'someusername';
  WebDAV.Password := 'somepassword';
  FRootObject := WebDAV.RootObject;
  for I := 0 to FRootObject.ChildsCount - 1 do
  begin
    FObject := FRootObject.Childs[I];
    CurNode := SomeTreeView.Items.AddChildObject(Parent, 
    FObject.FileName, FObject);
    if FObject.IsFolder then
      CurNode.HasChildren := True;
  end;
End;

Uploading Document.doc to the server.

Stream := TFileStream.Create('Document.doc', fmOpenRead);
Try
  // FWDObject is folder object
  NewFile := FWDObject.Upload('Document.doc', Stream, nil, True);
finally
  Stream.Free;
end;

Deleting file or folder with FWDObject.

FWDObject.Delete;

Compiled Demo Screenshots

Click on the screenshot to view a larger image.