Ò»ÃûDelphi³ÌÐòÔ±µÄ¿ª·¢Ï°¹ß
Óйؿª·¢Ï°¹ßµÄһЩÏë·¨£¬ÈçöáÔÚºí£¬²»Í²»¿ì¡£¾¿Æä·¢Ìù¶¯»ú£¬µ±È»²»ÅųýÓÐÆÈ¡²ÎÓë·ÖµÄ¿ÉÄÜ£¬µ«ÁíÒ»·½Ã棬ҲϣÍûÄܸøÍ¬ÐУ¨ÄîXing£©ÕßÌṩһЩ
½¨Ò飬»òÕ߲ο¼(Ï£Íû²»ÊÇÎóÈË×ÓµÜ)¡£Í¬Ê±£¬Ò²Ï£Íû¸÷λÄܹ»¾ÍÎÒµÄÕâЩªϰ£¬·¢±íÒ»µã¿´·¨£¬¸ø³öÅúÆÀºÍÖ¸ÕýµÄÒâ¼û¡£Ð»Ð»¡£
Ò»£®½¨Á¢¹¤³ÌĿ¼
Ê×ÏÈ£¬µÚÒ»²½Òª×öµÄ£¬µ±È»ÊǸøÐÂÏîÄ¿½¨Ò»¸öµ¥¶ÀµÄĿ¼£¨±ðЦ£©¡£Ä¿Â¼Ãû³ÆÓëÏîÄ¿Ãû³ÆÍ¬Ãû£¬»òÕßÁíȡһ¸öÒ²¿É£¬Ö»ÒªÇå³þ¡¢¼òÁ·¡£È»ºó£¬ÔÚ´ËĿ¼Öд´½¨ÒÔϸ÷
¸öĿ¼£º
<Doc>£ºÓÃÀ´´æ·Å¸ÃÏîÄ¿Ïà¹ØµÄ¿ª·¢Îĵµ£¨ÐèÇó˵Ã÷£¬¸ÅÒªÉè¼Æ£¬ÏêϸÉè¼ÆµÈµÈµÈµÈ£©£»
<Source>£ºÓÃÀ´´æ·ÅDelphiÔ´³ÌÐòÖеĔ.Dpr”,”.Pas”,”.Dfm”µÈÎļþ£»
<Dcu>£º¸ÃĿ¼Öдæ·Å”.Dcu”Îļþ£¬½«’.Pas’Óë’.Dcu’Îļþ·Ö¿ª´æ·ÅÖ»ÊÇΪÁËÈÃSourceĿ¼µÄÄÚÈݸü¼ÓÇå³þһЩ£»
<Bin>£º´æ·Å¹¤³ÌµÄÊä³öÎļþ£¬±ÈÈç”.Exe”,”.Dll”»òÕß”.Ocx”µÈµÈ£»
<Log>£ºÓÃÀ´´æ·ÅÈÕÖ¾Îļþ£»Í¨³£ÔÚÕâ¸öĿ¼ÖÐÎÒ»á·ÅÒ»¸ö”<ÏîÄ¿Ãû³Æ>³ÌÐòÔ±ÈÕÖ¾.Txt”Îļþ¡£
<Images>£ºµ±È»ÊÇ´æ·Å¹¤³ÌÖÐÓõ½µÄͼƬµÄĿ¼ÁË¡£Ò»°ãÇé¿öÏ£¬Õâ¸öĿ¼ÊÇÉÙ²»Á˵ġ£¼ÙÈ绹Óõ½ÆäËû×ÊÔ´£¬ÄÇôҲһÑù½¨Á¢¸÷×ÔµÄĿ¼£¬
±ÈÈçWav£¬±ÈÈçAviµÈµÈ¡£
¶þ£®ÉèÖù¤³ÌÑ¡Ïî
ÔÚDelphiÖд´½¨Ò»¸öÐµĹ¤³Ì£¬½«´Ë¹¤³Ì±£´æµ½SourceĿ¼ÖУ¬Í¬Ê±£º
a.
ѡһ¸öÄÍ¿´µÄ£¬ÓëÏîÄ¿ÓÐЩÁªÏµµÄͼ±ê×÷ΪÕâ¸ö¹¤³ÌµÄͼ±ê¡£µ±È»£¬Õâ¸öͼ±ê¿ÉÄÜÖ»ÊÇÁÙʱÓÃÓõ쬵«ÊÇ×ÜÒª±ÈDelphiĬÈϵÄÄǸöÄÑ¿´µÄÒªºÃ²ÅÐУ¬Òª²»È»£¬
Ôõô¶ÔµÃÆð×Ô¼º£¿
b.½«Project Options -> Directories/ConditionalsÒ³ÃæÖеÄOutput
DirectoryÉèÖÃΪBinĿ¼£»
c.½«Unit output DirectoryÉèÖÃΪDcuĿ¼¡£
Èý£®Ìí¼Ó³£Á¿µ¥Ôª
Ìí¼ÓÒ»¸öеÄUnit£¬Áí´æÎª“unt<¹¤³ÌÃû> Consts.Pas”£¬ÓÃÀ´±£´æ¹¤³ÌÖÐÓõ½µÄ³£Á¿¡£
ËÄ£®Óйش°Ì壨Form£©¼°µ¥Ôª(Unit)
Ïà¹ØÎĵµ£º
Delphi´Ó6.0¾Í¿ªÊ¼Ö§³ÖWeb ServicesµÄ¿ª·¢ºÍÓ¦ÓÃÁË£¬±¾ÎÄͨ¹ýʹÓÃDelphi 7.0µ÷ÓÃÐÂÀË·¢ËͶÌÐŵÄWeb Service½øÐжÌÐÅÓ¦ÓóÌÐò¿ª·¢ÕâһʵÀýÏêϸµÄ½éÉÜÔÚDelphiÖÐÈçºÎ¿ª·¢»ùÓÚWeb ServicesµÄÓ¦ÓÃϵͳ¡£
µÚÒ»²½£¬×¼±¸¹¤×÷£¬Á˽âÐÂÀ˶ÌÐÅWeb Service¡£ÐÂÀË·¢ËͶÌÐŵÄWeb ServiceµØÖ·ÊÇhttp://smsinter.sina.com.cn/ws/smswebs ......
ÔÚWIN32ÖеĴ®¿ÚͨѶ£¨Delphi£©
ÓÉÔÚWIN32²Ù×÷ϵͳÖнûÖ¹Ó¦ÓóÌÐòÏóDOSÖÐÄÇÑùÖ±½Ó·ÃÎʼÆËã»úÓ²¼þ£¬Òò´Ë£¬ÎÞ·¨ÏóÒÔǰÄÇÑù²ÉÓÃÖж϶Áд´®¿Ú¡£µ«ÊÇÔÚWIN32ÖÐÎÒÃǿɷ¢²ÉÓÃÁ½ÖÖ·½·¨·ÃÎÊ´®¿Ú£º1¡¢Ê¹ÓÃVBÖеÄMSCOMM´®¿Ú¿Ø¼þ£»2¡¢²ÉÓÃAPIº¯Êý£¬±¾ÎÄÖ÷Òª½éÉܲÉÓÃAPIº¯ÊýʵÏÖ´®¿ÚͨѶ¡£
ÓÉÓÚWM_COMMNOTIFYÏûÏ¢Òѱ»È¡Ïû£¬¹Ê±¾ÎÄ×Ô¶ ......
1.¸ù¾Ý Delphi Ö¸Áî²Î¿¼ÊÖ²áÖÐ
˵Ã÷£º
Assigned º¯Ê½ÔÚ²ÎÊý²»Îªnilʱ´«»ØTrue,±íʾָÕëÒѾָµ½Ä³¸öÄÚ´æµØÖ·£¬Õâ¸öÄÚ´æµØÖ·¿ÉÄÜÊÇÒ»¸ö¶ÔÏóµØÊ×µØÖ·£¬Ò²¿ÉÄÜÔÚº¯Êý»ò¹ý³ÌÖУ¬ÉùÃ÷Ò»¸öÖ¸Õë±äÁ¿£¬Ã»Óи³ÖµÎªnil £¬ÎÞÂÒµÄÖ¸Ïòij´¦£¬ÕâÁ½¸öÖÖÇé¿ö£¬Assigned£¨Ö¸Õë±äÁ¿£©¶¼²»Îªnil , º¯Êý·Å»ØTrue£»
¶ø²ÎÊýΪnilʱÔò´«»ØFals ......
¾µä°¸Àý·ÖÏí Ôݲ»Éæ¼°·ÖÇø±í,±íÉè¼ÆµÈ Ö»´Ó±È½ÏdzµÄ½Ç¶ÈÀ´ÓÅ»¯
1.Ïȼì²é³ÌÐò ¼ì²éÄ£ÐͲãµÄÉè¼ÆÓë±àÂëÊÇ·ñºÏÀí ½«ºÍÕâ¸ö±íÓÐÓа󶨵ÄÊý¾Ý¸ÐÖª¿Ø¼þÈ«²¿È¥µô¡£
2.¹ÀËãÒ»¸öÊý¾ÝµÄ×î´óÁ¿ ¿ÉÒÔ´ÓÉè¼Æ½Ç¶È Ò²¿ÉÒÔ´Ó¿Í»§ÌṩµÄÊý¾Ý·ÖÎö δÀ´Ò»¶¨ÖÜÆÚÄÚµÄÔ¤Ôö³¤Á¿
3.½«ÌõÂëµÄ³¤¶È±£´æÆðÀ´£¬ÏÈÓÃÌõÂëµÄ³¤¶È½øÐйýÂË£¬Èç¹û80%ÒÔÉϵ ......
procedure TForm2.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Screen.Cursor := -2;
end;
const
crDefault = TCursor(0);
crNone = TCursor(-1);
crArrow = TCursor(-2);
&n ......