Delphi´¦Àíʼþº¯ÊýÖеÄSender: TObject´ú±íʲô£¿
ÏÂÃæÕâ¸ö°´Å¥µã»÷ʼþÖУ¬Sender´ú±íË£¿
Delphi(Pascal) code:
procedure Tsomain.ToolButton1Click(Sender: TObject);
ÊÇ´ú±íʼþµÄÓµÓÐÕßÂð£¿
Delphi(Pascal) code:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(Sender.ClassName);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Button1Click(Button2);
Button1Click(Form1);
end;
¿´ÕâÑù×ÓºÃÃ÷°×Âð? :)
´ú±íÏìÓ¦Õâ¸öʼþµÄµ±Ç°µÄ¿Ø¼þ
±ÈÈçÄãÉÏÃæÄǸöʼþ£¬sender¾ÍÊDZ»µã»÷µÄÄǸö°´Å¥
°´ÕÕÓïÒåÀ´ËµÊDZ»´¥·¢µÄÄǸö¿Ø¼þ
µ±È»Ò²²¢²»Ò»¶¨ Èç¹û×Ô¼ºµ÷ÓÃÕâ¸ö²ÎÊý¿ÉÒÔ´«ÈÎÒâ¶ÔÏó
´ú±íÏìÓ¦Õâ¸öʼþµÄµ±Ç°µÄ¿Ø¼þ;ToolButton1µÄclickʼþ.
µ±È»Ò²²¢²»Ò»¶¨ Èç¹û×Ô¼ºµ÷ÓÃÕâ¸ö²ÎÊý¿ÉÒÔ´«ÈÎÒâ¶ÔÏó;
ÏòÏÂתÐ͵ÄÀà²ÎÊý£¬Óô¦»¹Óкܶà
Ïà¹ØÎÊ´ð£º
Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂð£¿
......
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......
VC++ ÖУ¬ &±äÁ¿Ãû¡£ ÊÇʲôÒâ˼¡£ DelphiÖÐ ºÍËûÒ»ÑùµÄ·ûºÅ ÊÇÄĸö¡¢£¿
´ó¼Ò¶¼ÈÏΪ£¬CÓïÑÔÖ®ËùÒÔÇ¿´ó£¬ÒÔ¼°Æä×ÔÓÉÐÔ£¬ºÜ´ó²¿·ÖÌåÏÖÔÚÆäÁé»îµÄÖ¸ÕëÔËÓÃÉÏ¡£Òò´Ë£¬ËµÖ¸ÕëÊÇCÓïÑÔµÄÁé»ê£¬Ò»µã¶¼²»Îª¹ý¡£Í¬Ê±£¬ ......
ÓÐʲô¹¹ÏëÌÖÂÛһϡ£
ÕâÀà¶«Î÷Ö÷ÒªÊÇÈËÆøºÍ½çÃæ»¨ÉÚ,¼¼ÊõÉÏûʲôÄѵã.
ÕâÎÒÖªµÀ£¬ÄǼ¼ÊõÉϵÄÄØ£¿ÓÐûÓй¹ÏëһϸÃÔõôÉè¼Æ£¿Ö÷ÒªÊÇdelphi×ÔÉíÄܲ»Äܹ»Íê³É£¬Èôͬʱ´óÁ¿¿Í»§µÇ½£¬·´Ó¦ËÙ¶ÈÈçºÎµÈµÈ¡£
ÒýÓÃ
......