delphiÖÐLENGTHÓï¾ä×ÜÊdzö´íÈçºÎ´¦Àí
¸÷λ´óÀÐ:
СµÜÔÚ±à³Ì¹ý³ÌÖÐÓöµ½Èç´ËÎÊÌâ,°Ù˼²»ÖªÈçºÎ½â¾ö,Çë¸÷λ´óÀÐÖ¸½Ì.
ÓÃÃ÷»ª·Ç½Ó´¥Ê½¶Á¿¨Æ÷(USB)¶Á4442¿¨,ÆäÖÐFUNCTIONÖÐÓÐlength,µ«ÔÚFORMÖл¹ÓÐÒ»¸öÊý×Ö¼üÅÌÖ÷ҪΪÔÚ´¥ÃþÆÁÉÏÊäÈëÓÃ(procedure TForm7.FormShow(Sender: TObject);),ÔËÐÐʱÔÚº¬ÓÐLENGTHÓï¾äÖб¨´í(missing operator or semicolom),µ«Õâ¹À¼Æ²»»áÊǷֺŵÄÎÊÌâ,ÎÒ½«functionÓï¾äɾ³ý,³ÌÐòÕý³£.¹À¼ÆÊÇfunctionÖеÄlengthºÍ³ÌÐòÖеÄlength²»Ïàͬ,¸üÒªÃüµÄÊÇÔÚǰ¼¸¸öFORMÖж¼ÓÐÀàËÆµÄС¼üÅ̳ÌÐò,ÊÇËãÊÇɾ³ýÁ˱¾FORMÖеijÌÐò,±¨´í¾Íµ½Ç°FORMÖеÄÀàËÆÓï¾äÉÏ(ÏàͬµÄ±¨´íÐÅÏ¢),Çë´óÀаïÖú½â¾ö,·Ç³£¸Ð¼¤!
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, ExtCtrls;
type
TForm7 = class(TForm)
GroupBox1: TGroupBox;
Label1: TLabel;
Panel1: TPanel;
Panel2: TPanel;
Panel3: TPanel;
Panel4: TPanel;
Panel5: TPanel;
Panel6: TPanel;
Panel7: TPanel;
Panel8: TPanel;
Panel9: TPanel;
Panel10: TPanel;
Panel11: TPanel;
Panel12: TPanel;
Panel13: TPanel;
Panel14: TPanel;
GroupBox2: TGroupBox;
Edit1: TEdit;
 
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£
µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË
ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......
¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
ÈçÌ⣬ µã»÷DelphiµÄFile²Ëµ¥µÄExitÍ˳öDelphi£¬ Delphi²¿·Ö¹Ø±Õ--¼´²»ÄÜÔÙ²Ù×÷Delphi£¬µ«ÈÎÎñÀ¸ºÍ½ø³ÌÀDelphi»¹ÔÚÔËÐУ¬Ã»ÓÐÕæÕýµÄÍ˳ö¡£ÊDz»Êǰ²×°ÁËjre¸Ä±äÁËijЩ»·¾³±äÁ¿µ¼Ö£¬ÇëÎʸßÊÖÈçºÎ½â¾ö£¿ ×¢£ºÃ»°²×° ......