Re: Delphi XML-RPC

> ________________________________________________________________________
> 
> Message: 2         
>    Date: Thu, 28 Jul 2005 22:15:54 -0000
>    From: "zeketheelder" <JIM@xxxxxxxx>
> Subject: Delphi XML-RPC
> 
> I am attempting to build a client/server set using the Source forge 
> Delphi XML-RPC library.  I have built the basic demo c/s and they
> work fine.  I also have scaled up a bit and run a system to control 
> some hardware at my home (http://www.seti.net/SETINet/SETINet.htm). 
> So far so good.
> 
> Now I am attempting to build a full system and cannot managed to
> build a server that can retrieve anything other than String.  I need
> to work with Struct.
> 
> Is there anyone familiar with the Delphi library?  A good demo would
> do wounders.
> 
> Thanks....... Jim
> 


Some excerpt from one of my programs:

procedure TForm1.probeninfoMethod(Thread: TRpcThread; const MethodName: 
string; List: TList; Return: TRpcReturn);
var
...
   RpcStruct:   IRpcStruct;
begin
....

       RpcStruct := TRpcStruct.Create;
       RpcStruct.AddItem('Ident', FieldByName('MAID').AsString);
       RpcStruct.AddItem('Index', FieldByName('PRID').AsInteger);
       RpcStruct.AddItem('Menge', FieldByName('BZMENGE').AsFloat);
...
       RpcStruct.AddItem('Ausdruck', FieldByName('BT').AsString = 'J');
       Return.AddItem(RpcStruct);


....
end;


Use latest dxmlrpc version. Latest I could find was 2.1.0.
Works fine for me.





 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/xml-rpc/

<*> To unsubscribe from this group, send an email to:
    xml-rpc-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/