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

ÄÇλ´óÅ£°ï°ïæ?¸øÎÒ½éÉÜÏÂDelphiµÄÖ¸Õ룡

  ²ÑÀ¢ Õâô¶àÄê Ö¸ÕëÒ»Ö±²»ÊìϤ~


  ¿ç³ÌÐò£¬·¢ËÍÏûÏ¢£¬sendmessage(Handle,WM_Str,Integer(Edit1),Integer(Button1)) ;

ÎÒÏëͨ¹ýÏûÏ¢ ½«edit1,button1µÄÖ¸Õë·¢Ë͵½³ÌÐò2£¬

  ³ÌÐò2½ÓÊܺó£¬Í¨¹ýTedit(Pointer(Msg.Lparam))À´¿ØÖÆedit1 


  ¿çϵͳµ«²»¿çµçÄÔ~ ÇëÎÊÕâÑùÓÐÎÊÌâÂð£¿


 
 
Delphi(Pascal) code:

WM_COPYDATA,Õâ¸öÏûÏ¢Äã²Î¿¼Ò»ÏÂ,GOOGLEºÜ¶à½éÉÜ.°üÀ¨Delphi.



WM_COPYDATA»òÄÚ´æÓ³Ïñ

WM_COPYDATA


ÊDz»ÊÇÓÉÓÚ²»Í¬ÏµÍ³·ÖÅ䲻ͬµÄÄÚ´æ¿é£¬¼´Ê¹°ÑÄÚ´æµØÖ·´«¹ýÈ¥Ò²»áÒòΪÄÚ´æ¿éÊǸôÀëµÄ¶øÑ°Ö·²»µ½

http://topic.csdn.net/t/20020313/11/572835.html
°ïÄãÕÒÒ»¸öÌû×Ó


À´Ñ§Ï°Ï¡£

·¹ý£¬UP¡£

ÒýÓÃ
http://topic.csdn.net/t/20020313/11/572835.html
°ïÄãÕÒÒ»¸öÌû×Ó


-----------
Ê×ÏÈлл£¬ÔÙÎÊÏ¿çϵͳÊDz»ÊÇÓÉÓÚÄÚ´æÑ°Ö·ÎÊÌâ ÒýÆðÖ¸ÕëʵÀý»¯³ö´íµÄ¡£

»¹ÓÐÎÒÏë´«µÝµÄÊǶÔÏ󣬲»ÊÇ×Ö·û´®Ö®ÀàµÄ¡£

»¹ÊDz»Ðа¡  ͨ¹ýÏûÏ¢´«µÝ¶ÔÏó¸ÃÔÚÄÇô×ö

ѧϰ

ѧϰ

32λWindows²Ù×÷ϵͳ£¬ÎªÃ¿¸ö½ø³Ì·ÖÅä¶ÀÁ¢µÄµØÖ·¿Õ¼ä£¬ÒªÏëͨÐÅ£¬¾ÍÒªÕÒ²Ù×÷ϵͳ°ïæ

¾ÍÏóÊÖ»ú¸úÊÖ»úµÄ¹ØÏµ£¬¶ø²»ÊǶԽ²»ú¸ú¶Ô½²»úµÄ¹ØÏµ

ͨ¹ýÏûÏ¢ºÜÄÑ´«µÝ¶ÔÏó£¬Äã¿ÉÒÔ³¢ÊÔÓÃÄÚ´æ¹²ÏíµÄ·½Ê½È¥×ö


Ïà¹ØÎÊ´ð£º

СµÜ²»»á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ÔõÑùÏÔÊ¾ÍøÒ³µÄÒ»²¿·Ö

Delphi
  ÔõÑù»ñÈ¡ÍøÒ³²¿·ÖÄÚÈÝ£¨´úÂ룩£¬²¢ÇÒÏÔʾ³öÀ´£¡
£¨Ö»ÊÇÍøÒ³ÀïÃæµÄÒ»²¿·ÖÄÚÈݲ¢²»ÊÇÈ«²¿£©
ûŪ¶®£¡

ÀàËÆwebseverµÄ¹¦ÄÜ£¿
¹À¼ÆÊÇÀûÓÃieµÄ½Ó¿Ú¡£¡£¡£¡£¡£¡£¡£¡£

ÊÇÀàËÆwebseverµÄ¹¦ÄÜ ......

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

delphiÖÐselect µÄ whereºóÃæµÄid=±äÁ¿Ôõôд°¡

ÎҵijÌÐòÖÐÓÐÒ»¶Î¸üÐÂijһÌõ¼Ç¼µÄÓï¾ä£º
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.textµÄÖµÒѾ­È¡µÃ;
...
...
...
adoQuery1.sql.add('update ¼Æ»®Çåµ¥±í set ¼Æ»®ÈÕ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ