delphi ±à¼Æ÷ÈçºÎµÃÖªµ±Ç°ÐкÅ
´°¿ÚÖв¼ÖÃÒ»¸öRichEdit»òÕßmemo£¨ÃüÃûΪeditor£©£¬ÒÔ¼°Ò»¸öbutton¡£ÔÚbuttonµÄonclickʼþÖÐдÈëÏÂÁдúÂë¡£
¡¡¡¡ var
¡¡¡¡¡¡CurrentLine:Integer;
¡¡¡¡¡¡begin
¡¡¡¡ ¡¡¡¡CurrentLine:=Editor.Perform(em_ LinefromChar,SFFFF,0); ¡¡¡¡
¡¡¡¡¡¡¡¡ Application.MessageBox(PChar(¡äµ±Ç°ÐкÅÊǡ䣫IntToStr(CurrentLine)),¡äÏûÏ¢¡ä,mb_iconinformation); ¡¡¡¡
¡¡¡¡ end;
Ϊʲô»á±¨´íÄØ [Error] Unit1.pas(29): Illegal character in input file: '¡¡' ($A1A1)
[Error] Unit1.pas(31): Illegal character in input file: '¡¡' ($A1A1)
[Error] Unit1.pas(31): Undeclared identifier: 'em_'
[Error] Unit1.pas(31): 'END' expected but ',' found
¡£¡£¡£¡£¡£
´úÂë³öÏÖÁËÈ«½ÇµÄ¿Õ¸ñ(»úÄÚÂëΪ$A1A1)£¬±ÈÈçÔÚCurrentLine:=Editor......ÕâÐеÄCurrentLineÇ°Ãæ(ÓÐÁ½¸ö)£¬»¹ÓÐApplication.MessageBox......µÄApplicationÇ°Ãæ(ÓÐÒ»¸ö)£¬¼¸ºõÿһÐÐÖж¼ÓÐÈ«½ÇµÄ¿Õ¸ñ£¬¹À¼ÆLZÊÇ´ÓÍøÉϳÀ´µÄ´úÂ룬ÓÐÐ©ÍøÕ¾»á½«´úÂëÖеĿոñ»»³ÉÈ«½ÇµÄ£¬ÒÔÊÔͼ×èֹһЩÐÂÊֳϮ´úÂë¡£
em_ LinefromCharÖгöÏÖÁËÒ»¸ö¶àÓàµÄ¿Õ¸ñ¡£
Ã²ËÆÓÐÌØÊâ×Ö·û£¬½¨ÒéÊÖ¹¤ÖØÐ´£¬²»ÒªÓø´ÖÆÕ³Ìù
em_ LinefromChar,Ï»®ÏߺóÃæ¶àÁ˸ö¿Õ¸ñ
Delphi(Pascal) code:
¡¡¡
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
ÓÉÓÚ¿Í戶¶ËÓеÄÎļþ經³£¸üУ¨遠³ÌµÄ£¬²»ÊǾÖÓò網£©£¬
ËùÒÔÏë寫個×Ô動¸üÐ嵀 ³ÌÐò¡£
¿´網É쵀 ·½·¨資ÁÏ£¬ÖªµÀЩ·½·¨£¬µ«²»ÖªµÀ¾ß體Ôõô寫¡£
......
¸÷λ´óϺ£¬Ð¡µÜÓõÄÊÇADOÁ¬½ÓACCESSÊý¾Ý¿â£¬ÓÃDBGridÏÔʾ²éѯµÄÊý¾Ý£¬ÎÒ×öµÄÊǸöÊý¾Ý²É¼¯ÏµÍ³£¬¸ù¾Ý²»Í¬µÄµØÖ·°ÑÊý¾Ý·ÅÔÚACCESSÊý¾Ý¿âÖв»Í¬µÄ±íÀïÃæ£¬ÏÖÔÚÎÒÏë²éѯijһ¶Îʱ¼äÄÚËùÓбíÄÚµÄÊý¾Ý£¬²¢ÇÒÔÚDBGridÖÐÏÔʾ³ ......