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

DElPHIÉú³ÉµÄEXEÎļþ£¬Ôõô°ÑXMLÎļþ¼¯³É½øÈ¥

ÏÖÔÚ×öÁËÒ»¸ö¼òµ¥µÄ³ÌÐò£¬Óõ½ÁËXML×÷Êý¾Ý¿â£¨ÄÚÈÝÓеã¶à£©£¬

Ä¿Ç°ÎÒÊÇ°ÑXMLÄÚÈÝдÔÚDELPHIÀïµÄÒ»¸öConst ±äÁ¿À¿ÉÊÇXMLÄÚÈÝÉÙµÄʱºò£¬Ã»ÓÐÎÊÌ⣬

¶àÁ˾ÍÌáʾ[´íÎó] Unit1.pas(144): Too many local constants.  Use shorter procedures£¬

ÇëÎÊÓÐʲô°ì·¨°ÑXML¼¯³Éµ½±àÒëµÄEXEÎļþÖÐÂð£¿

ÎÒÕâ¸ö¼òµ¥µÄÈí¼þ£¬²»Ï£Íû±ðÈË¿´µ½ÎÒµÄXMLÊý¾Ý£¬Ò²²»ÏëÓÐÌ«¶àÎļþ£¬Ö»ÏëÓÐÕâÒ»¸öExeÖ´ÐÐÎļþ£¨´¿ÂÌÉ«¾«ÉñÂ
°ÑXMLÎļþµ±³É×Ö·û´®×ÊÔ´±àÈëexe×ÊÔ´.

ÒýÓÃ
°ÑXMLÎļþµ±³É×Ö·û´®×ÊÔ´±àÈëexe×ÊÔ´.


ͬÒâÂ¥ÉÏ¿ÉÒÔ×÷Ϊ×ÊÔ´·Åµ½exeÀïÃæ

×î¼òµ¥µÄ×ö·¨£º·ÅÒ»¸ö²»¿É¼ûµÄmemo£¬ÄÚÈݾÍÊÇxml
²»¹ý£¬delphiµÄÈ·Ó¦¸ÃѧϰpythonµÄ'''Ö§³Ö¶àÐеÄÎı¾
Ö§³Ö¶àÐеÄÎı¾
Ö§³Ö¶àÐеÄÎı¾
'''ÕâÑùµÄÓï·¨

ÎÒÏÖÔÚ¾ÍÊǵ±×÷×Ö·û´®×ÊÔ´µÄ£¬¿ÉÊÇÄÚÈÝÌ«³¤ÁË£¬ÌáʾToo many local constants.  Use shorter procedures

°ÑÄÚÈݶ¼×°Ôص½½á¹¹Ìå°¢

×ÊÔ´Îļþ£¬½¨Òé

exeÔËÐеÄʱºò°Ñ×ÊÔ´ÎļþµÄxml¼ÓÔØ£¬½âÎö£¬
È»ºó£¬Ïë¸ÉÂï¸ÉÂï

·Åµ½memo°É£¬±È½Ï¼òµ¥

ÒýÓÃ
×ÊÔ´Îļþ£¬½¨Òé

exeÔËÐеÄʱºò°Ñ×ÊÔ´ÎļþµÄxml¼ÓÔØ£¬½âÎö£¬
È»ºó£¬Ïë¸ÉÂï¸ÉÂï

Ôõô×ö£¿

ÒýÓÃ
·Åµ½memo°É£¬±È½Ï¼òµ¥

·Åµ½MEMOÒ²²»ÐУ¬µ÷ÓÃmemo.textʱ³öÏֺöà'#$D#S$A'ÕâÑùµÄ£¬±ÈÈçÎÒµÄ×Ö·ûÖÐÓÐ: <mindays>£¬µ÷ÊÔʱ¹Û²ìÈ´³ÉÁË: &


Ïà¹ØÎÊ´ð£º

СµÜ²»»áDELPHI£¬Çë´óÏÀÃÇ°ï¸öæ

Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

delphi動態調ÓÃdllµÄÀ§»ó

procedure RunFunction;  
  type  
  TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃ溯ÊýµÄÉùÃ÷ÐÞ¸Ä  
  var  
  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ