Hola AgustinOrtu,
//al momento de enviar el unit recibo este mensaje en el foro
El texto que has ingresado es muy largo (53228 caracteres). Por favor acórtalo a 30000 caracteres de largo.
Lo adjuntare en dos mensajes.
Gracias, ahora agrego el código.
Hace un momento logre que compile sin errores, pero al generar la acción en el boton, la aplicación genera un error de "Access Violation at Address" . No se como recuperar la información.
Unit principal (VCL)
Código Delphi
[-]unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Data.DB, DBAccess, Uni, UniProvider,
SQLServerUniProvider, Vcl.StdCtrls, Vcl.Grids, Vcl.DBGrids, MemDS,Soap;
type
TForm1 = class(TForm)
Button2: TButton;
Memo1: TMemo;
procedure Button2Click(Sender: TObject);
private
public
end;
var
Form1: TForm1;
ws:sugarsoapPortType;
implementation
{$R *.dfm}
procedure TForm1.Button2Click(Sender: TObject);
var
autenticacion:user_auth;
usuario:name_value_list;
resultado:entry_value;
begin
resultado := ws.login(autenticacion,'',usuario);
end;
end.