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

delphiÖÐʹÓÃflash¿Ø¼þµÄ·½·¨

flashÊÇmacromedia¹«Ë¾³öÆ·µÄ£¬ÓÃÔÚ»¥ÁªÍøÉ϶¯Ì¬µÄ¡¢¿É»¥¶¯µÄshockwave¡£ËüµÄÓŵãÊÇÌå»ýС£¬¿É±ßÏÂÔر߲¥·Å£¬ÕâÑù¾Í±ÜÃâÁËÓû§³¤Ê±¼äµÄµÈ´ý¡£
    flash¿ÉÒÔÓÃÆäÉú³É¶¯»­£¬»¹¿ÉÔÚÍøÒ³ÖмÓÈëÉùÒô¡£ÕâÑùÄã¾ÍÄÜÉú³É¶àýÌåµÄͼÐκͽçÃ棬¶øʹÎļþµÄÌå»ýÈ´ºÜС¡£
    flashËäÈ»²»¿ÉÒÔÏóÒ»ÃÅÓïÑÔÒ»Ñù½øÐбà³Ì£¬µ«ÓÃÆäÄÚÖõÄÓï¾ä²¢½áºÏ javascripe£¬ÄúÒ²¿É×÷³ö»¥¶¯ÐÔºÜÇ¿µÄÖ÷Ò³À´¡£
    flashÁíÍâÒ»¸öÌصã¾ÍÊDZØÐë°²×°²å¼þplug-in£¬²ÅÄܱ»ä¯ÀÀÆ÷Ëù½ÓÊÜ£¡µ±È»ÕâÒ²±ÜÃâÁËä¯ÀÀÆ÷Ö®¼äµÄ²îÒ죬ʹ֮һÊÓͬÈÊ£¡
    µ«ÊÇÄãÖªµÀÂð£¿ÔÚdelphiÖпÉÒÔÖ±½Ó´ò¿ªflash¶¯»­£¬²¢¿ØÖÆËü²¥·ÅºÍÍ£Ö¹¡£Ä㻹¿ÉÒԵõ½ËüµÄ×ÜÖ¡Êý£¬ÖªµÀÔõôʵÏÖµÄÂð£¿Çë¸úÎÒÀ´¡£
    ÔÚdelphiÖеÄcomponent|import activex contrals...ÖÐÑ¡ÖÐ "shockwave flash(version 1.0)",²¢µ¥»÷install,»á³öÏÖÒ»¸öinstall´°¿Ú¡£
    Èç¹ûÒª°ÑËüÌí¼Óµ½Ò»¸öÒѾ­´æÔڵİüÖУ¬ÔÚ"into existing package"¶Ô»°¿òÖÐµÄ "file name:"´°¿ÚÖÐÑ¡ÔñÄãÏë°²×°µÄ·¾¶£¬²¢µ¥»÷"ok"£»»áµ¯³öÒ»¸öÈ·ÈϵĶԻ°¿ò£¬ËüÎÊÄã"package dclusr50.bpl will be rebuilt. continue?",µ¥»÷"yes"£»ÔÚµ¯³öµÄ´°¿ÚÖе¥»÷»÷"install",¸Ã²å¼þ¾Í°²×°Íê±Ï¡£
    Èç¹ûÒª°ÑËüÌí¼Óµ½Ò»¸öн¨µÄ°üÖУ¬ÔÚ"into new package"¶Ô»°¿òÖÐµÄ "file name:"´°¿ÚÖÐÑ¡ÔñÄãÏë°²×°µÄ·¾¶£¬²¢Ð½¨Ò»¸ö°ü£¬¼ÙÈçÃüÃûΪtest£¬²¢µ¥»÷"ok"£»ËüÎÊÄã"package test.bpl will be built. continue?",µ¥»÷"yes"¡£ ÔÚµ¯³öµÄ´°¿ÚÖе¥»÷»÷"install",¸Ã²å¼þ¾Í°²×°Íê±Ï¡£
    Õâʱ£¬Äã»áÔڿؼþÌõµÄactivexÏ·¢ÏÖÒ»¸öеĿؼþ£¬Ãû×ÖΪshokewaveflash, µ¥»÷Ëü°ÑËü·ÅÔÚformÖУ¬ÔÚ¸ÃformÖзÅÒ»¸öopendialog¿Ø¼þºÍÒ»¸öpanel£¬ÔÚ¸ÃpanelÉÏ·ÅËĸöbutton£¬ËûÃǵÄcaptionÊôÐÔ·Ö±ðÃüÃûΪ"openfile","play","stop","close".ÉèÖÃpanel1£¬shockwaveflashµÄalign ÊôÐÔ·Ö±ðΪalleft ºÍalclient; ·Ö±ðÔÚÕâËĸöbuttonµÄonclickʼþÖÐдÏÂÈçÏ´úÂ룺
    procedure tform1.button1click(sender: tobject);
      begin
         if opendialog1.execute then
             shockwaveflash1.movie:=
opendialog1.filena


Ïà¹ØÎĵµ£º

DelphiÄ£Äâ¼üÅÌ¿ØÖÆCaps Lock(keybd_event)

ÒÔCaps Lock¼ü¾ÙÀý£¬ÆäËü(VK_NUMLOCK),Ààͬ£º
 
ÅжÏ״̬£º
 
·½·¨1
Level: integer;
   
Level := GetKeyState(VK_CAPITAL);
if Level = 0 then
//ûÁÁ
else
//ÁÁÁË(1)
 
·½·¨2
KeyState : TKeyBoardState;
 
GetKeyboardState(KeyState);
if KeySt ......

DELPHIÖвÙ×÷ACCESSÊý¾Ý¿â

DELPHIÖвÙ×÷ACCESSÊý¾Ý¿â(½¨Á¢.mdbÎļþ,ѹËõÊý¾Ý¿â)

ÒÔÏ´úÂëÔÚWIN2K,D6,MDAC2.6ϲâÊÔͨ¹ý,

±àÒëºÃµÄ³ÌÐòÔÚWIN98µÚ¶þ°æÎÞACCESS»·¾³ÏÂÔËÐгɹ¦.







//ÉùÃ÷Á¬½Ó×Ö·û´®

Const

SConnectionString      
= 'Provider=M ......

LINUXÏÂΪffÌí¼Óflash ²å¼þ

Ê×ÏÈ£¬ ÎÒµÄFF°æ±¾ÊÇ3.0.16µÄ£¬´Ó¹ÙÍø£¨http://get.adobe.com/flashplayer/£©ÉÏÏÂÔØ.tar.gz°üºó¡£¡£½âѹ³öÀïÃæµÄÒ»¸ö£ª.soÎļþ
¼þÖ®ºó£¬°Ñ¸ÃÎļþ¸´ÖƵ½/usr/lib/mozillia/pluginsÏ£¬ÖØÆôff¾ÍOKÁË¡£
£¨ÒÔÉÏ·½·¨½ö¹©²Î¿¼£¬ÖÁÉÙÎÒÊÇÕâÑù×öµÄ£¬²¢Çҳɹ¦ÁË£¬£© ......

Delphi callµ÷ÓÃÀý×Ó

ÔÚȺÀï¿´µ½ÓÐÈË·¢Á˸ö±ðÈË·¢¸øËûµÄ
ÎÒ¿´ÁËдµÄ±È½ÏÉú¶¯ ÔÚÕâת¸ø´ó¼Ò¿´¿´
ºÃµÄ Ê°È¡ÎïÌ庯ÊýдºÃÁË Ï²½ÊÇÈçºÎ½«´úÂë×¢Èëµ½ÓÎÏ·½ø³ÌÖÐÖ´ÐÐ??
1) С͵¿ªÃÅ
PHND:= OpenProcess (PROCESS_ALL_ACCESS, False, PID);µÃµ½ÓÎÏ·´°¿Ú¾ä±ú»ñµÃȨÏÞ
2)С͵ÔÚ·¿¼ä¸ã¸ö·Å×÷°¸·½°¸µÄµØ·½
TAdd := VirtualAllocEx(PHND, nil, 4096, ......

Delphi²Ù×÷XML

  Delphi²Ù×÷XMLÊǺܷ½±ãµÄ£¬Ö÷ÒªÓÐÁ½ÖÖ·½·¨£»
     1.ÓÃTClientDataSet²Ù×÷XML£»TClientDataSetÊǸöºÃ¶«Î÷£¬ÓÃËü²Ù×÷XMLÊǺܼòµ¥µÄÊ£¬²»¹ýȱµãÊÇÖ»ÄܲÙ×÷¹Ì¶¨¸ñʽµÄ XML£¬ËüÊʺϲÙ×÷±í½á¹¹µÄÊý¾Ý£¬Èç¹ûÄãÐèÒª°ÑÊý¾Ý±íµ¼³ö³ÉXMLÄÇÓÃTClientDataSetÊǸöºÃÖ÷Ò⣬±ÈÈçÏÂÃæÊÇÒ»¸öÊý¾Ý¼¯µ¼³ö³ÉXMLµÄ· ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ