delphiÖÐÔõÑùÕýÈ·µ÷ÓÃunicode°æº¯ÊýºÍ·Çunicode°æº¯Êý
Ò»¸öc++±àдµÄdllÖÐ,ÓÐÁ½¸ö°æ±¾µÄº¯Êý,Ò»¸öÊÇGetTextA,Ò»¸öÊÇGetTextW,ÎÒÏÖÔÚÏëÒ»¸öGetTextÕýÈ·µ÷ÓÃÕâÁ½¸öº¯Êý
ÔÚc++ÖпÉÒÔ
#ifdef unicode
#define GetText GetTextW
#else
#define GetText GetText A
ÔÚdelphiÖÐÔõÑù¸ã?
delphi ÓÖ²»ÄÜÒ»¸ö±àÒëÆ÷ͬʱ±àÒë unicode ºÍ·Ç unicode °æµÄ³ÌÐò£¬Õâ¶Ô delphi À´ËµÃ»É¶ÒâÒå
procedure GetText;stdcall ;external 'ABC.dll';
µ«ÎÒÕâôд:Function GetText(hdc:HDC;rect:PRECT;Astr:Pchar):Boolean;stdcall;external 'EDRLIB.DLL';
³öÏÖÎÞ·¨¶¨Î»µ½GetTextÓÚ¶¯Ì¬Á´½Ó¿âEdrlib.dllÉϵĴíÎó°¡..
¼ì²é'EDRLIB.DLL'ÊÇ·ñµ¼³öGetTextº¯Êý£¡
Èç2LËù˵£¬ÁíÍâÒ²¿ÉÒÔÖ±½Óloadlibrary¶¯Ì¬µ÷ÓÃDLLµ±Öеĺ¯Êý
c++µÄdllµÄµ¼³öº¯ÊýÊÇÎÒ˵µÄÓÐÁ½¸ö°¡,Ò»¸öÊÇGetTextA,ÁíÒ»¸öÊÇGetTextW,ÔÚdelphiµ÷ÓÃʱ,
Function GetTextA(hdc:HDC;rect:PRECT;Astr:Pchar):Boolean;stdcall;external 'EDRLIB.DLL';
ÎÒÊÔ¹ýÕâÑùÊÇÄÜÕýÈ·µ÷ÓõÄ
ÎÒÖ»ÊDz»ÏëÓÃGetTextAº¯ÊýÃû,ÏëÓÃGetText×÷Ϊº¯ÊýÃû
Ïà¹ØÎÊ´ð£º
delphiÈçºÎÏòAccessÊý¾Ý±íÖÐ×Ô¶¨Òå×Ö¶Î?È»ºóÏÔʾµ½DBGridÖÐ
ÔõôûÈËÀíÎÒѽ
·Ö·Ö߯ÉÙßÖ£¬Ò»°ãÈ˶¼ÀÁµÃ½øÀ´¡¡*^_^*
SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))
ADOQue ......
Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
begin
case wParam of
WM_KEYDOWN:
fEatKeystroke := (p.vkCode = VK_RETURN);
& ......
delphi Òì²½Ïß³ÌÔõôÔõôʵÏÖ£¿
Çë¸÷λ´óÀаïæ£¡
×îºÃÓиöʵÀý£¡
¶àл
Ä㲻ͬ²½¾ÍÊÇÒì²½ÁË,»¹Ð´É¶
ĬÈÏÇé¿öÏ£¬Ï߳̾ÍÊÇÒì²½µÄ¡¡¡¡*^_^*
¹À¼ÆÂ¥Ö÷ͬ²½ºÍÒì²½¸ÅÄûŪÇå
ÕæÎÞÓï¡£¡£¿É ......
Delphi 3Äê ÔÚÉϺ£Ò»¸öÔÂÄÜÄöàÉÙ
£¨½Ó´¥¹ýµÄ¶¼ÊÇСÏîÄ¿ ´óÏîĿûÔõô×ö¹ý£©
»¹ÊÇ¿´¹«Ë¾°É¡£¡£
mark
ͬÑùÒ»Ì×·¿×Ó£¬ÎÒͬÊÂ̸14K/㎡£¬ÎÒ̸ÁË15K/㎡¡£
½á¹û²îÁË10W£¬ÎÒ¶à»ñÀûÁ ......
ÏÖÔÚ×öÁËÒ»¸ö¼òµ¥µÄ³ÌÐò£¬Óõ½ÁËXML×÷Êý¾Ý¿â£¨ÄÚÈÝÓеã¶à£©£¬
ĿǰÎÒÊǰÑXMLÄÚÈÝдÔÚDELPHIÀïµÄÒ»¸öConst ±äÁ¿À¿ÉÊÇXMLÄÚÈÝÉÙµÄʱºò£¬Ã»ÓÐÎÊÌ⣬
¶àÁ˾ÍÌáʾ[´íÎó] Unit1.pas(144): Too many local ......