procedure TForm1.Button23Click(Sender: TObject); var strReturn:CQHB_JHResponse; CQHB:CQHB_JH; begin try try with HTTPRIO1 do begin HTTPWebNode.UserName:='CQHB'; HTTPWebNode.PassWord:='38DCCDFE60664B58F4728F655460CF77'; end; strReturn:=GetService1Soap(true,'',HTTPRIO1).CQHB_JH(CQHB); except on E: Exception do ShowMessage(e.Message); end; //Memo1.Text:=strReturn; finally end; 如何将提交的用户名和密码转换成CQHB_JH类型
----------------------------------------------
-