Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Çë½ÌdelphiµÄÄÚ´æ¹ÜÀí£¡

ÈçÏ£¬ÎÒ¶¨ÒåÁËÒ»¸örecordÀàÐÍ£¬ÔÙÔÚÆäÉ϶¨ÒåÒ»¸öÊý×éÀàÐÍ
TParamValue = Record
    ParamName:String;                          //The Name of Variant
    ParamValue:String;                          //The Value of Variant
  end;
TParamValues = Array of TParamValue;
ÎÒÓÐÒ»¸öfunction·µ»ØÒ»¸öTParamValuesÀàÐÍÊý×é¡£
function GetValueList():TParamValues;
var
  ValueList: TParamValues;
begin
  SetLength(ValueList,n);
  ......
  Result:=ValueList;
end;
¾­¹ý²âÊÔÿ´Îµ÷ÓÃfunction¶¼·µ»ØÒ»¸öеÄValueList
procedure UseValueList()£»
var
  ValueList: TParamValues;
begin
  ValueList:=GetValueList();
  ......
end;
ÇëÎÊÕâ¸öValueListÔÚʹÓÃÍê±ÏºóDelphi»Ø×Ô¶¯»ØÊÕÄÚ´æÂð£¿
ÕâÖ»Ö»ÊǸöÊý×é,Ó¦¸ÃÊÍ·Å

µ«ÊÇÔÚ
procedure UseValueList()£»
var
  ValueList: TParamValues;
begin
  ValueList:=GetValueList();
  ......
end;

ÕâÀïÃæValueListÄÜÕý³£ÔËÐÐÂð?

»á»ØÊÕ°É£¬ËäÈ»ÄãÉÏÃæÓõ½setLength·ÖÅäÄڴ棬µ«ÓÉÓÚ¶¯Ì¬Êý×éÊÇÉú´æÆÚ×Ô¹ÜÀíÀàÐÍ¡£

動態數組Ò²ÊDzÉÓà string ÒýÓÃ計數µÄ¹ÜÀí·½Ê½維護Éú´æÖÜÆÚ

²»»á×Ô¶¯»ØÊÕ£¬´æÔÚÄ


Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

VC++ ÖеÄ&·ûºÅ ¶ÔÓ¦µÄÊÇDelphiÖеÄÄĸö·ûºÅ£¿£¿

VC++ ÖУ¬ &±äÁ¿Ãû¡£ ÊÇʲôÒâ˼¡£ DelphiÖÐ ºÍËûÒ»ÑùµÄ·ûºÅ ÊÇÄĸö¡¢£¿

´ó¼Ò¶¼ÈÏΪ£¬CÓïÑÔÖ®ËùÒÔÇ¿´ó£¬ÒÔ¼°Æä×ÔÓÉÐÔ£¬ºÜ´ó²¿·ÖÌåÏÖÔÚÆäÁé»îµÄÖ¸ÕëÔËÓÃÉÏ¡£Òò´Ë£¬ËµÖ¸ÕëÊÇCÓïÑÔµÄÁé»ê£¬Ò»µã¶¼²»Îª¹ý¡£Í¬Ê±£¬ ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......

ÇódelphiºÚ°×Æå´úÂë

ÒªÇóÄÜʵÏÖ¶þÈËÔŲ́ͬµçÄÔÉ϶ÔÕ½µÄ ²»ÓÃÌ«»¨ÉÚ ×îºÃ»¹¼ÓÉÏÈË»ú¶ÔÕ½µÄ ¼±Ðè Ë­°ïÏÂæ°¡Ñ½!!!!!!!!
up

baidu£¬google

up

http://www.codepub.com/software/view-software-4061.html 
ÍøÕ¾ÉÏÓÐ
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ