Delphi´¦ÀíSoapHeaderÎÊÌâ
ÒªÍê³ÉÒ»¸öÐèÒªÑéÖ¤µÄWebService·þÎñ£¬ÖÕ¶ËÐèÒª·¢Ë͵ÄSOAP°üÈçÏ£º
<soapenv: Header xmlns:wsa="http://www.w3.org/2005/08/addressing">
<IP>10.109.225.172 </IP>
<Security>
<UserInfo>
<Name>hu </Name>
<Password>123 </Password>
</UserInfo>
<UserId>
<Id>1100231 </Id>
<Password>123 </Password>
</UserId>
</Security>
</soapenv:Header>
Ŀǰ×Ô¶¨ÒåÁ˼̳ÐTSOAPHeaderÀ࣬ÈçÏ£º
type
UserInfo = class(TSOAPHeader)
private
FName: WideString;
FPassword: WideString;
published
property Name: WideString read FName write FName;
property Password: WideString read FPassword write FPassword;
end;
UserId= class(TSOAPHeader)
private
FId: WideString;
FPassword: WideString;
published
property Id: WideString read FId write FId;
property Password: WideString read FPassword write FPassword;
end;
initia
Ïà¹ØÎÊ´ð£º
delphiÄÚÖõļÓÃܽâÃܵ¥ÔªÊÇÄĸö£¿
DelphiÓÐÄÚÖüÓÃܽâÃܵ¥Ôª£¿
delphiÀïÓиö¼ÓÃܺͽâÃܵĵ¥Ôª
ÒýÓÃ
delphiÀïÓиö¼ÓÃܺͽâÃܵĵ¥Ôª
ÊÇÄĸö£¿
windowsµÄapi£¿
±ê×¼¼ÓÃܵÄÔ´´úÂë£¬ÍøÉÏ ......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
×òÍíÔÚDelphiÊý¾Ý¿â²éѯÖÐÓöµ½ÁËÒ»¸öÒɻ󡣴úÂëÈçÏ£º
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......