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

Delphi ×é¼þ¿ª·¢½Ì³ÌÖ¸ÄÏ£¨3£©×é¼þ×¢²á

ÔÚÉÏһƪÖУ¬ÎÒÃǼòµ¥µÄʵÏÖÁËÒ»¸ö¶ÔDelphi×ÔÉíµÄTEdit±à¼­¿ò¿Ø¼þµÄÒ»¸öÀ©³ä£¡µ«ÊÇÎÒÃDz¢²»ÄÜÏñDelphi×Ô¼ºµÄTEditÒ»Ñù£¬Äܹ»
ÔÚÉè¼Æ×´Ì¬Ï½øÐÐÉè¼Æ£¬¶øÊǷǵÃÒª×Ô¼ºÊÖ¶¯´´½¨¿Ø¼þ£¬È»ºó²ÅÄÜʹÓá£Õâ¸öËäȻ˵ҲÊÇ×é¼þ£¬µ«ÊÇȴʧȥÁË×é¼þµÄ¿ÉÉè¼ÆµÄ·½±ãÐÔ£¬½ö½ö¿É×÷Ϊһ¸öÀà¿âÀ´Ê¹Óá£
ÏÖÔÚÎÒ¾ÍÀ´½éÉÜһϣ¬ÈçºÎÈÃÕâ¸ö×é¼þ×¢²áµ½IDEÉÏ£¬È»ºóÈÃÄãÄܹ»ÔÚÉè¼Æ×´Ì¬Ï¿ÉÒÔÉè¼ÆÊ¹Óá£
   ÔÚ½²×¢²á×é¼þµÄʱºò£¬ÎÒÃÇÐèÒªÏÈÃ÷°×DelphiÖеİüµÄ¸ÅÄÕâÀïÎҾͲ»×ö˵Ã÷ÁË£¬²»Çå³þµÄ£¬¿ÉÒÔµ½CnpackÍøÕ¾È¥Á˽âÕâ·½ÃæµÄ֪ʶ
¡£ÔÚ×¢²á×é¼þʱ£¬¾ÍÐèÒªÒ»¸öÉè¼ÆÆÚ¼äµÄ°üÎļþ£¬È»ºó½«ÎÒÃÇÉÏ´Îн¨µÄEditµÄÄǸöµ¥ÔªÎļþÌí¼Óµ½°üÖС£Ê×ÏÈ£¬ÎÒÃÇн¨Ò»¸ö°üÎļþ£¬È»ºóÌí¼Óµ¥ÔªÎļþ£¬¾ßÌå²Î¿¼ÈçÏ£º
´ÓͼÉϵIJÙ×÷¿ÉÒÔ¿´µ½£¬ÎÒÏÈн¨ÁËÒ»¸öÃû×Ö½Ð×öTestPackageµÄ°ü£¬È»ºó½«Edit1.pasµÄµ¥ÔªÎļþÌí¼Óµ½Õâ¸ö°üÀïÃæÁË£¬Ö®ºó±àÒ룬°²
×°ÁËÖ®ºó£¬¾Í½«¿Ø¼þÏÔʾÔÚStandardÄǸö×é¼þÀ¸ÖÐÁË£¬ÀïÃæÓÐÒ»¸öTEdit1µÄ×é¼þ£¬ÄǸö¾ÍÊÇÎÒÃÇ´ÓTEdit¼Ì³Ð¹ýÀ´µÄÐÂ×é¼þ£¡È»ºóÔÙ¿´ÊôÐԱ༭
Æ÷ÖоͶàÁËAlignmentÕâ¸öÊôÐÔ£¬ÉèÖÃËü£¬¾ÍÄÜÉèÖÃÎÄ×ÖµÄ¶ÔÆë·½Ê½ÁË¡£
  
ºÃÁË£¬µ½´ËΪֹ£¬Õâ¸ö¼òµ¥×é¼þ¾Í×¢²áÍê³ÉÁË£¬¿ÉÄÜÓÐÈ˲»Á˽⣬¾Í½¨Á¢Ò»¸ö°ü£¬±àÒë°²×°£¬¾ÍÄܽ«×é¼þ×¢²áµ½IDEµÄ×é¼þÀ¸ÖÐÈ¥Âð£¿Êµ¼ÊÉϵ±È»²»ÊÇ×ö¸ö°²×°°ü
±àÒëһϾÍÍêÁ˵ġ£»¹¼ÇµÃ£¬ÔÚÉÏһƪÖУ¬ÎÒ×ʼÓÃ×é¼þ±àдÏòµ¼×öÁËʲôÂð£¿ÎÒÑ¡ÔñÁ˽«×é¼þ°²×°µ½StandardÄǸöÀ¸ÉÏ¡£ÓÐÐĵÄÈË´ò¿ª
Eidt1.pas¿ÉÄܾͻᷢÏÖÔÚEdit1.pasÖÐÓÐÒ»¸ö×¢²áµÄ¹ý³ÌΪ
procedure
Register;
implementation
procedure
Register;
begin
RegisterComponents(
'
Standard
'
, [TEdit1]);
end
;
Õâ¸öRegister¾ÍÊÇ×é¼þ×¢²áµÄ¹ý³Ì£¬°ü»á×Ô¶¯µ÷Óõģ¬×¢²á¹ý³ÌÖе÷ÓÃÁËRegisterComponentsÕâ¸ö¹ý³Ì
Õâ¸ö¹ý³ÌµÄµÚÒ»¸ö²ÎÊýÖ¸¶¨Òª×¢²áµ½IDEµÄÄĸö×é¼þÃæ°å£¨Èç¹ûIDE×é¼þÃæ°åÖÐûÓÐÄã¸ø¶¨µÄÕâ¸öÖµ£¬Delphi»á×Ô¶¯Ìí¼ÓÒ»¸öеÄ×é¼þÃæ°å£©£¬²ÎÊý¶þÖ¸¶¨µÄÊÇҪע²áµ½IDEµÄ×é¼þ¶ÔÏóÀàÊý×é¡£
ÁíÍ⣬ÕâÀïÒªÌá³öÐèҪעÒâµÄÒ»µã¾ÍÊÇ£¬ËäÈ»Delphi±¾ÉíÊDz»Çø·Ö
´óСдµÄ£¬µ«ÊǼǵÃÕâ¸ö×é¼þ×¢²áµÄ¹ý³ÌµÄRegister±ØÐëÊÇÕâ¸öÑù×Ó£¬¶ø²»Äܱä³ÉСдregisterÕâÑù£¬·ñÔò£¬×é¼þ¾Í×¢²á²»ÉÏÈ¥Á˹þ£¬Í¬Ê±£¬×¢
Ò⣬ÎÒÔÚÇ°Ãæ¸øTEdit1µÄÐÂÊôÐÔAlignmentµÄÉùÃ÷ÊÇ·ÅÔÚPublishedÕâ¸öÓòÖеģ¬ÕâÊÇÒòΪҪÏëÔÚIDEÉè¼ÆÆÚ»·¾³Äܹ»¿´µ½Õâ¸öÊôÐÔ£¬¾Í
±ØÐë·ÅÔÚPublished


Ïà¹ØÎĵµ£º

Delphi 쵀RTTI

Ŀ¼
===============================================================================
¡Ñ RTTI ¼ò½é
¡Ñ Àà(class) ºÍ VMT µÄ¹ØÏµ
¡Ñ Àà(class)¡¢ÀàµÄÀà(class of class)¡¢Àà±äÁ¿(class variable) µÄ¹ØÏµ
¡Ñ TObject.ClassType ºÍ TObject.ClassInfo
¡Ñ is ºÍ as ÔËËã·ûµÄÔ­Àí
¡Ñ TTypeInfo – RTTI ÐÅÏ¢µÄ½ ......

Delphi Assigned


1.¸ù¾Ý Delphi Ö¸Áî²Î¿¼ÊÖ²áÖÐ
˵Ã÷£º
Assigned º¯Ê½ÔÚ²ÎÊý²»Îªnilʱ´«»ØTrue,±íʾָÕëÒѾ­Ö¸µ½Ä³¸öÄÚ´æµØÖ·£¬Õâ¸öÄÚ´æµØÖ·¿ÉÄÜÊÇÒ»¸ö¶ÔÏóµØÊ×µØÖ·£¬Ò²¿ÉÄÜÔÚº¯Êý»ò¹ý³ÌÖУ¬ÉùÃ÷Ò»¸öÖ¸Õë±äÁ¿£¬Ã»Óи³ÖµÎªnil £¬ÎÞÂÒµÄÖ¸Ïòij´¦£¬ÕâÁ½¸öÖÖÇé¿ö£¬Assigned£¨Ö¸Õë±äÁ¿£©¶¼²»Îªnil , º¯Êý·Å»ØTrue£»
¶ø²ÎÊýΪnilʱÔò´«»ØFals ......

DelphiÖ¸ÕëÀàÐÍdzÎö

²Î¿¼×ÊÁÏ
“dz̸Object PascalµÄÖ¸Õë”
“Delphi Ö¸ÕëÈëÃÅ”
 
»ù±¾ÖªÊ¶
Ö¸Õë
Ö¸ÕëÊÇÒ»¸öÌØÊâµÄ±äÁ¿£¬ËüÀïÃæ´æ´¢µÄÊýÖµ±»½âÊͳÉΪÄÚ´æÀïµÄÒ»¸öµØÖ·¡£  
×¢Ò⣺
£¨1£©¡¢Ö¸Õë¶ÔÓ¦×ÅÒ»¸öÊý¾ÝÔÚÄÚ´æÖеĵØÖ·£¬µÃµ½ÁËÖ¸Õë¾Í¿ÉÒÔ×ÔÓɵØÐ޸ĸÃÊý¾Ý¡£
£¨2£©¡¢Ò»¸öÖ¸Õë±äÁ¿½ö½öÊÇ´æ´¢Ò ......

delphi±¨¾¯ÉùÒô Beep¡¢MessageBeep ºÍ Windows.Beep


Îҵİ취£¬Ôö¼ÓÒ»¸ötimer ÉèÖüä¸ô100ms£¬Í¨¹ýtimerµÄʹÄÜ·ñ£¬¿ØÖƱ¨¾¯ÉùÒô¿ª¹Ø
procedure TForm1.Timer1Timer(Sender: TObject);
begin
   Windows.Beep(1200+i_f,10+i_f);
   if i_f<2000 then
   begin
      inc(i_f);
   end
end;
== ......

Delphi×é¼þ¿ª·¢½Ì³ÌÖ¸ÄÏ£¨1£©×é¼þ¿ª·¢¸ÅÊö

ÔÚ¿ª½²Ö®Ç°£¬Ê×ÏÈ£¬ÎÒ¼ÙÉèÄãÁ˽âʲôÊÇÃæÏò¶ÔÏó£¬Ê²Ã´ÊÇÀà¡£Èç¹û²»Á˽âµÄ»°£¬½¨ÒéÏÈÈ¥Á˽âÒ»ÏÂÏà¹ØÖªÊ¶£¡
  
ÔÚDelphiÖУ¬×é¼þ£¬ÎÒÃÇ¿ÉÒÔ½«ËüÀí½âΪһ¸ö¸öµÄ·â×°ºÃÁ˵ŦÄܶÔÏó¿â£¬Ê¹ÓÃÕâ¸ö¿â£¬¾ÍÖ»Óüòµ¥µÄ¼¸¾ä´úÂ룬ÉõÖÁ½ö½ö¼òµ¥µÄÉèÖü¸¸öÊôÐÔ¾ÍÄÜʵÏÖijЩ
¹¦ÄÜ£¬ÎÒÃÇ¿ÉÒÔ½«×é¼þÏëÏó³ÉÈÕ³£Éú»îÖÐʹÓõÄijЩ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ