Ç¿ÁÒ½¨ÒéDELPHI°æ¸ü»»´ó°æ - Delphi / ·Ç¼¼ÊõÇø
hongqi162¡¢windindance ´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance ¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄÒýÓà ¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É ¹¤×÷µÄ»¹ÒªÉϰ࣬ѧϰµÄ×ܵÃÉϿΣ¬ÒåÎñÀͶ¯Â´ó¼Ò¶¼¿íÈÝһЩ°É£¬ÒÔ×ÔÖÎΪÖ÷ Ö§³Ö ÔÂÁÁDZˮÉÏÀ´£¬¹À¼Æ´ó¶àÊýʱºò¶¼ÔÚɾÌû£¬»Ø¸´±È½ÏÉÙ windindanceÊÇÔªÀÏÁË£¬Ó¦¸ÃÊÚÓèÈÙÓþ´ó°æ³ÆºÅ£¬ºÇºÇ ¶¼²»ÊÇ̫ԳÀ쵀 ºÙºÙ£¬×îÔ³µÄÎÒ¼û¹ý....ÍÛ¹þ¹þ¹þ ¸¡ÔêÒýÓà ¸¡Ôê ÔÂÁÁMM£¬´óÃæ»ýɾÌû£¬ÄãµÄÓÅÐã°æÖ÷¿¼ºË¾Í¹ýÁË...ÒýÓà ÒýÓà 7 Â¥ hongqi162 µÄ»Ø¸´: ¸¡Ôê ÔÂÁÁMM£¬´óÃæ»ýɾÌû£¬ÄãµÄÓÅÐã°æÖ÷¿¼ºË¾Í¹ýÁË... ÄÑ¹Ö ¹À¼ÆÒÔǰµ¶¾ÍÓõÄÕâÕУ¬Ã¿´Î¿¼ºË¶¼Í¨¹ý ÔõôÓÖ¿ªÌÖÂÛÕâ¸öÎÊÌâÁË. ºÇºÇ ËûÃǶ¼ÊÇÓÐÄÜÁ¦µÄÈË ÔÂÁÁ¾³£ÔÚ¡£ÒýÓà ÔÂÁÁ¾³£ÔÚ¡£ Ö»ÊDZȽϵ͵÷¶øÒÑ ÔÂÁÁÿÌì¶¼¼û,³ýÁËÏÂÓêÌì ÎÒ¾õµÃD°æÏÖÔڵİæÖ÷ÃÇ£¬ÌرðÊǸ÷С°æµÄ°æÖ÷ÃÇ»¹ÊǺܳÆÖ°µÄ¡£ÎÞÂÛºÎʱ¶¼ÄÜ¿´µ½ËûÃǵÄÉíÓ°£¬Ïà½ÏÒ»ÏÂÒÔǰµÄD°æ¸÷С°æÖ÷µÄ¡°×Ù¼£ÄÑÃÙ¡±ÊǺÜÄѵõġ£ÓÐÁ˸÷λС°æÖ÷µÄÖ§³Å£¬´ó°æÖ÷ͶµãÏÐÒ²ÊÇÓ¦¸ÃµÄ£¬ËûÃÇËùÒª×öµÄÖ÷ÒªÊÇ·Å¿ªºÍÖ§³Ö¡£Èç¹ûÊÂʶ¼µÃ´ó°æÖ÷³öÃæ£¬·´µ¹ÏԵôó°æÖ÷ÓÐЩ²»³ÆÖ°ÁË¡£ ÁÁÃû¹ÊÇÄܼûµ½¼¸´ÎµÄ£¬ windindance ȷʵºÜÉÙ¼û ÒýÓà ¸¡Ôê up
Ïà¹ØÎÊ´ð£º
ÓÉÓÚ¿Í戶¶ËÓеÄÎļþ經³£¸üУ¨遠³ÌµÄ£¬²»ÊǾÖÓò網£©£¬ ËùÒÔÏë寫個×Ô動¸üÐ嵀 ³ÌÐò¡£ ¿´網É쵀 ·½·¨資ÁÏ£¬ÖªµÀЩ·½·¨£¬µ«²»ÖªµÀ¾ß體Ôõô寫¡£ ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer); var len,MaxDelete:Integer; P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë begin P:=PLongint(A);// È¡µÄ A µÄ ......
¸÷λ¸ßÊָϿì°ï°ïæ¡£ ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£ Çë¿´´úÂë ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£ ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£ È磺DLLImport.GlobalAddAtom(¡¡); Îļþ£ºUShare.pas Delphi(Pascal) code: unit UShare; interface uses Windows, Me ......