ÈçºÎ²é¿´delphiÄÚ²¿´úÂë
ÇëÎʸ÷λÄܲ»ÄÜ¿´µ½delphiÖÐ×Ô´ø×é¼þµÄÄÚ²¿´úÂë,±ÈÈçÔõôȥ¿´speedbuttonµÄflat·½·¨ÖеĴúÂëµÈ.
SpeedButton1.Flat
Êó±êÒÆµ½FlatÉÏ£¬°´×¡Ctrl¼ü£¬×ó»÷
¶ÔÁË£¬SpeedButton1 ±ØÐëÊÇ´´½¨ºÃµÄ
Êǰ¡£¬¾ÍÕâô¼òµ¥£¡£¡
Èç¹ûÕÒ²»µ½¾ßÌåÄÚÈݾÍÈ¥¸¸ÀàÕÒ
½áÌûÓÐÒæ£¬ÎÞº¦£¡
Â¥Ö÷²»»áÏÖÔÚ»¹Ã»·¢ÏÖÕâ¸ö¹¦Äܰɡ¡
Ò²¿ÉÒÔµ½°²×°Îļþ¼ÐµÄlibÏÂÃæ·Ïäµ¹¹ñÈ¥
ÄÇÒª·¼¸Äê°¡£¿
ÈËÈ˶¼ÊÇÐÂÈË£¬²»ÒÔÏÂÎÊΪ³Ü£¬Ó¦¸Ã¹ÄÀø¡¢¿Ï¶¨¡¢°ïÖú£¡
¿´Ô´´úÂëǰÏȶÔVCL¿ò¼ÜÓиö´ó¸ÅÁ˽â,
ctrl¼ÓÊó±ê×ó»÷ºÃÏñÕâÑùÖ»ÄÜ¿´µ½flat·½·¨µÄÉùÃ÷²¿·Ý¿´²»µ½ÀïÃæµÄ´úÂë,¸ßÊÖÃÇÄܲ»ÄÜÏêϸЩ.
Delphi(Pascal) code:
property Flat: Boolean read FFlat write SetFlat default False;
FFlatÊdzÉÔ±±äÁ¿£¬¿´¿´·½·¨SetFlatµÄ´úÂ룺
1¡¢¶Ô×ÅSetFlat, Ctrl + Êó±ê×ó»÷, ¿´µ½SetFlatµÄÉùÃ÷£º
private
...
procedure SetFlat(Value: Boolean);
...
2¡¢´úÂë´°¿Ú×ó²àĿ¼Ê÷ TSpeedButton -> Private -> Ë«»÷SetFlat
ÊDz»ÊDz»¿ÉÒÔ¿´µ½flatÀïÃæµÄÈ«²¿´úÂëµÄѽ!!
àÞ,лл¸÷λÁË,»ù±¾Ã÷°×ÁË.
Ïà¹ØÎÊ´ð£º
Ïò¸÷λ¸ßÊÖÇóÖú¡£
ÎÒÓÃdelphi2009±àдÁËÒ»¸ö¹ÜÀíϵͳ£¬Ê¹ÓõÄÊÇaccessÊý¾Ý¿â¡£ÏÖÔÚÏëͨ¹ý¶àÈËÒ»Æð¼ÈëÊý¾Ýºó£¬½«Êý¾Ýµ¼³ö£¬µ¼³öµÄÊý¾Ý¿â°üº¬¶à¸öÏàͬµÄ±í¡£ÔÙ½«µ¼³öµÄÊý¾ÝÒÀ´Îµ¼È뵽ͬһ¸öÊý¾Ý¿âµÄÏàͬ±íÖУ¬µ¼Èë ......
Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂð£¿
......
delphi º¯Êý£º
function RB(A: longint): longint;
begin
Result := (A shr 24) or ((A shr 8) and $FF00) or ((A shl 8) and $FF0000) or (A shl 24);
end;
ÎÒת³ÉC#£º
& ......
ÇëÎÊdbook V1.10°æ±¾µÄÔ´´úÂ루delphi£©ÊDz»ÊÇÔËÐв»Á˰¡£¬ÔÚÍøÉÏÏÂÁ˺ö࣬´ò¿ªÖ÷´°ÌåµÄʱºò×ÜÊDZ¨´í,֮ǰ×Ôѧc#£¬²Å¸Õ¿ªÊ¼£¬ÏÖÔÚÀÏʦ²¼ÖÃÈÎÎñÈÃÎÒ¸Ädbook V1.10°æ±¾µÄÔ´´úÂ룬ץ¿ñÁË£¬Ò»µãÍ·Ð÷ҲûÓУ¿¸÷λ´óÏÀ¸øµ ......
ÎÒÏëÓà Delphi ±àд°üº¬º¯ÊýµÄ Dll£¬È»ºóÔÚ Excel VBA µ÷Óá£ÊÔÁ˺ܶà´Î¶¼ÎÞ·¨·µ»ØÕýÈ·µÄ½á¹û¡£
¾ßÌåÈçÏ£º
Delphi7 ÖеIJâÊÔÔ´Â룺
//********************************************************* ......