ȤζÌ⣺¿¼¿¼ÄãµÄDelphi»ù´¡
»îÔ¾Ò»ÏÂD°æµÄÆø·Õ£¬³ö¸öȤζֻÊÇÌâ¡£ ÏÂÃæµÄ´úÂëÖУ¬¶¨ÒåÁËÒ»¸ö¼Ç¼ÀàÐÍ£¬¶¨ÒåÁË2¸öͬÃûµÄ·½·¨£¨Í¬²»Í¬ÃûÎÞËùν£©£¬v1ºÍv2µÄx×ֶζ¼³õʼ»¯Îª10£¬·Ö±ðµ÷ÓÃ2¸ö·½·¨ºó¡£ÌáÎÊ£º 1¡¢v1.xÓëv2.xµÄÖµ·Ö±ðΪ¶àÉÙ£¿£¨ÒªÇó²»ÒªÔÚ»úÉϲâÊÔ£© 2¡¢¼ÓÈë´Ó¼Ç¼¶¨ÒåÖÐÈ¥µôy×ֶΣ¬v1.xÓëv2.xµÄÖµÓÖ·Ö±ðΪ¶àÉÙ£¿£¨ÒªÇó²»ÒªÔÚ»úÉϲâÊÔ£© 3¡¢ÎªÊ²Ã´»áÊÇÕâÑùµÄ½á¹û£¿Ï£Íû´ó¼ÒÌÖÂÛ¡£ Delphi(Pascal) code: type TTest = record x: Integer; y: Integer; end; procedure IncX(var v: TTest); overload; begin Inc(v.x); end; function IncX: TTest; overload; begin Inc(Result.x); end; var v1, v2: TTest; begin v1.x := 10; v2.x := 10; v1 := IncX; IncX(v2); end;
´í±ð×ÖÌ«¶à£ºÖ»ÊÇÌâ--¡µÖªÊ¶Ì⣻2¡¢¼ÓÈë--¡µ2¡¢¼ÙÈç ·¢ÏÖ×Ô¼ºµÄ»ù´¡²»ÊÇÒ»°ãµØ²î:) ¿ÚËãµÄÒ»¸ö¶¼²»¶Ô:(ÒýÓà ·¢ÏÖ×Ô¼ºµÄ»ù´¡²»ÊÇÒ»°ãµØ²î:) ¿ÚËãµÄÒ»¸ö¶¼²»¶Ô:( ÓеãȤ°É£¬ºÇºÇ v1.x 1 v2.x 11 ²»ÖªµÀ¶Ô²»¶Ô 1¡¢ÖµÏàͬ£» 2¡¢Öµ²»Í¬£» 3¡¢ÎªÊ²Ã´ÄØ£¿ÆÚ´ý¸ßÈ˻شð... sdfdsfsdgdfgfdgfdgfdgfd ghhjklklj;lkj jjjjjj ¿ÚËã:ֵû±ä°É. ³ÁĬÖÐ... ½²µÄ²»´í·Ç³£ÓмÛÖµ£¡ ÔÀ´ÕæµÄºÜ²î.. ÔÀ´Õæ²»ÐÐ ÈÆÔÎÁË 1.¶¼ÊÇ11? 2.²»±ä£¿ 3.ÄѵÀûÓвÎÓë¼ÆËãµ
Ïà¹ØÎÊ´ð£º
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬ Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿ ÏȰÑb.exe»¹Ô³öÀ´ÔÚµ÷Óã¬Ó¦¸ÃÊÇ× ......
×òÍíÔÚ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 µÄ ......
ÒªÍê³ÉÒ»¸öÐèÒªÑéÖ¤µÄWebService·þÎñ£¬ÖÕ¶ËÐèÒª·¢Ë͵ÄSOAP°üÈçÏ£º <soapenv: Header xmlns:wsa="http://www.w3.org/2005/08/addressing"> <IP>10.109.225.172 </IP> ......