Artigo Clube Delphi Edição 28 - Web Services: dos conceitos à implementação

Nesta segunda parte da nossa exploração dos web services, começaremos incluindo em nosso servidor um exemplo de transferência de datasets e depois mostraremos como criar clientes para web services, tanto convencionais como baseados na web.

Esse artigo faz parte da revista Clube Delphi edição 28. Clique aqui para ler todos os artigos desta edição



Atenção: por essa edição ser muito antiga não há arquivo PDF para download. Os artigos dessa edição estão disponíveis somente através do formato HTML.

Web Services: dos conceitos à implementação

Parte 2 – Clientes CLX e web

Nesta segunda parte da nossa exploração dos web services, começaremos incluindo em nosso servidor um exemplo de transferência de datasets e depois mostraremos como criar clientes para web services, tanto convencionais como baseados na web.

Transferência de datasets

Um recurso muito útil, bastante facilitado com os web services é a transferência de datasets. Para ilustrar uma das formas de implementação desse recurso vamos definir mais uma interface em nosso servidor:

 

unit IHistoricoIntf;

interface

type

  IHistorico = interface(IInvokable)

    ['{22EC0D1D-1EFB-4317-8E4F-5CC2667178A7}']

function GetHistorico: String; stdcall;

  end;

implementation

uses InvokeRegistry;

initialization

  InvRegistry.RegisterInterface(TypeInfo(IHistorico));

end.

 

Trata-se de uma declaração de interface muito simples – há apenas um método, GetHistorico, que retorna o conteúdo da tabela de histórico como uma string com formato XML/DataPacket:

 

unit IHistoricoImpl;

 

interface

 

uses InvokeRegistry, IHistoricoIntf,

SysUtils, WebBrokerSOAP, Midaslib;" [...] continue lendo...

Ebook exclusivo
Dê um upgrade no início da sua jornada. Crie sua conta grátis e baixe o e-book

Artigos relacionados