Changeset 361 for PersistentData/Backend/UPDClientXMLRPC.pas

Timestamp:

May 8, 2012, 10:24:35 PM (12 years ago)

Author:

chronos

Message:

• Added: Demo for PersistentData package.

File:

• PersistentData/Backend/UPDClientXMLRPC.pas (modified) (2 diffs)

PersistentData/Backend/UPDClientXMLRPC.pas

@@ -13 +13 @@
 
   TPDClientXMLRPC = class(TPDClient)
+    constructor Create(AOwner: TComponent); override;
   end;
 
@@ -18 +19 @@
 
 
+{ TPDClientXMLRPC }
+
+constructor TPDClientXMLRPC.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  BackendName := 'XMLRPC';
+end;
+
 end.