نحوه ارتباط برنامه به زبان دلفی با وب سرویس ؟

[sempaisaleh]

قابل توجه دوستان بلاخره از خودشون يه تكه كد گرفتم ولي جواب نداد از خط 8 ارور ميگيره.

procedure TForm1.Button2Click(Sender: TObject);

var

  WS: SmsServiceSoap;

  H: AccountCredentials;

  E:string;

begin

  H := nil;

  WS := GetSmsServiceSoap;

  try

    H := AccountCredentials.Create;

    H.username := 'user1';

    H.password:='ttttttt';

    (WS as ISOAPHeaders).Send(H);

    E:=WS.SendMessage('30007211','test','936xxxxxxx',1  ,'').ErrorDesc;

    ShowMessage(E);

  finally

    FreeAndNil(H);

  end;



end;

اينم ارورش

[Error] Unit1.pas(48): Incompatible types: 'SmsService.SmsServiceSoap' and 'Unit1.SmsServiceSoap'