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

ÔÚDelphi³ÌÐòÖвÙ×÷×¢²á±í(ת)

   32λDelphi³ÌÐòÖпÉÀûÓÃTRegistry¶ÔÏóÀ´´æÈ¡×¢²á±íÎļþÖеÄÐÅÏ¢¡£     
  ¡¡¡¡Ò»¡¢´´½¨ºÍÊÍ·ÅTRegistry¶ÔÏó  
   
  ¡¡¡¡1.´´½¨TRegistry¶ÔÏó¡£ÎªÁ˲Ù×÷×¢²á±í£¬Òª´´½¨Ò»¸öTRegistry¶ÔÏó£ºARegistry   :=   TRegistry.Create£»  
   
  ¡¡¡¡2.ÊÍ·ÅTRegistry¶ÔÏó¡£¶Ô×¢²á±í²Ù×÷½áÊøºó£¬Ó¦ÊÍ·ÅTRegistry¶ÔÏóËùÕ¼Äڴ棺ARegistry.Destroy¡£  
   
  ¡¡¡¡¶þ¡¢Ö¸¶¨Òª²Ù×÷µÄ¼ü  
   
  ¡¡¡¡²Ù×÷×¢²á±íʱ£¬Ê×ÏÈÓ¦Ö¸¶¨²Ù×÷µÄÖ÷¼ü£ºÏȸøÊôÐÔRootKey¸³ÖµÒÔÖ¸¶¨¸ù¼ü£¬È»ºóÓ÷½·¨OpenKeyÀ´Ö¸¶¨Òª²Ù×÷µÄÖ÷¼üÃû¡£  
   
  ¡¡¡¡1.Ö¸¶¨¸ù¼ü(RootKey)¡£  
   
  ¡¡¡¡¸ù¼üÊÇ×¢²á±íµÄÈë¿Ú£¬Ò²×¢²á±íÐÅÏ¢µÄ·ÖÀ࣬ÆäÖµ¿ÉΪ£º  
   
  ¡¡¡¡HKEY-CLASSES-ROOT£º´æ´¢Õû¸öϵͳ¶ÔÏóÀàÐÅÏ¢£¬ÈçActiveX¶ÔÏó×¢²á¡¢Îļþ¹ØÁªµÈÐÅÏ¢¡£  
   
  ¡¡¡¡HKEY-CURRENT-USER£º´æ´¢µ±Ç°Óû§µÄÅäÖÃÐÅÏ¢¡£ÎªÊôÐÔRootKeyµÄĬÈÏÖµ¡£  
   
  ¡¡¡¡HKEY-LOCAL-MACHINE£º´æ´¢µ±Ç°ÏµÍ³µÄÈíÓ²¼þÅäÖÃÐÅÏ¢¡£Ó¦ÓóÌÐò×Ô¼ºµÄÐÅÏ¢¿ÉÒÔ´æ´¢Ôڸøù¼üÏ¡£  
   
  ¡¡¡¡HKEY-USERS£º´æ´¢ËùÓÐÓû§Í¨ÓõÄÅäÖÃÐÅÏ¢¡£  
   
  ¡¡¡¡»¹¿ÉÒÔÊÇHKEY-CURRENT-CONFIG¡¢HKEY-DYN-DATA¡£  
   
  ¡¡¡¡2.Ö¸¶¨Òª²Ù×÷µÄÖ÷¼ü¡£  
   
  ¡¡¡¡Function   OpenKey(const   Key:   string;   CanCreate:   Boolean):   Boolean;  
   
  ¡¡¡¡Key£ºÖ÷¼üÃû£¬ÊǼüÃûÈ«ÃûÖгýÈ¥¸ù¼üµÄ²¿·Ö£¬ÈçSoftware¡£  
   
  ¡¡¡¡CanCreate£ºÔÚÖ¸¶¨µÄÖ÷¼üÃû²»´æÔÚʱ£¬ÊÇ·ñÔÊÐí´´½¨¸ÃÖ÷¼ü£¬True±íʾÔÊÐí¡£  
   
  ¡¡¡¡·µ»ØÖµTrue±íʾ²Ù×÷³É¹¦¡£  
   
  ¡¡¡¡3.¹Ø±Õµ±Ç°Ö÷¼ü¡£  
   
  ¡¡¡¡ÔÚ¶ÁÈ¡»ò´æ´¢ÐÅÏ¢Ö®ºó£¬Ó¦¼°Ê±½«¹Ø±Õµ±Ç°Ö÷¼ü£ºprocedure   CloseKey¡£  
   
  ¡¡¡¡Èý¡¢´Ó×¢²á±íÖжÁÈ¡ÐÅÏ¢  
   
  ¡¡¡¡ReadϵÁз½·¨´Ó×¢²á±í¶Áȡָ¶


Ïà¹ØÎĵµ£º

DelphiÖÐADOÒì²½Ö´Ðз½Ê½

     µ±A D O¿ªÊ¼´¦ÀíÊý¾Ýºó£¬Ó¦ÓóÌÐò±ØÐëµÈµ½A D O´¦ÀíÍê±ÏÖ®ºó²Å¿ÉÒÔ¼ÌÐøÖ´ÐС£µ«
ÊdzýÁËͬ²½Ö´Ðз½Ê½Ö®Í⣬ A D OÒ²ÌṩÁËÒì²½Ö´Ðеķ½Ê½£¬ÔÊÐíµ±A D O´¦Àíʱ£¬
Ó¦ÓóÌÐòÈÔÈ»Äܹ»ÏȼÌÐøÖ´ÐС£¶øµ±A D O´¦ÀíÊý¾ÝÍê±ÏÖ®ºó£¬ A D O»áÒÔʼþµÄ·½
ʽ֪ͨӦÓóÌÐò£¬´ËʱӦÓóÌÐò¿ÉÒÔÔÙ¸ù¾ÝA D OÖ´ÐÐµÄ ......

DELPHI 2007ÖÐʹÓÃADOµ÷ÓÃORACLEÓзµ»ØÓαêµÄ´æ´¢¹ý³Ì


ADO ʹÓà ORACLE provider FOR  OLE DB Çý¶¯Ê±
µ÷Óô洢¹ý³ÌÐèÒª·µ»ØÓαêʱ£¬ÔÚÁ¬½Ó×Ö·û´®ÖÐÔö¼Ó
PLSQLRSet=1 ²ÎÊý¡£
´æ´¢¹ý³ÌÖеÄÓα겻ÐèÒª¸¶³õʼֵ
 
Èç:
  sp1: TADOStoredProc;
 
 
 sp1.Close;
 sp1.ProcedureName := 'pkg_ScanList_By_JobNo.sp_GetScanList';& ......

VCÖе÷ÓÃDelphiµÄDLLÖеĻص÷º¯ÊýÀý×Ó

//Delphi²¿·Ö  
 //»Øµ÷º¯Êý¶¨Òå
type TOnMyCallBack = procedure(data:pchar; id:Integer);stdcall;  
 //DLLÖеĵ¼³öº¯ÊýÉùÃ÷
procedure StartCall(param:   TOnMyCallBack(data:pchar; id:Integer);stdcall;  
begin
  ...  
  ...  
end;  
&n ......

coolbarÈÃÄãµÄdelphiÓ¦ÓóÌÐò¸ü¿á

²Ü×æÈ¨
¡¡¡¡¹¤¾ßÌõÊdzÌÐòԱϲ»¶²ÉÓõÄ×é¼þ£¬Ëü¾ßÓмòÃ÷Ö±¹ÛµÄÍâÐΣ¬Äܹ»·½±ãÓû§Ö´ÐÐ×î³£ÓõŦÄÜ¡£Èç¹ûÄãʹÓÃdelphi3±à³Ì£¬ÄÇô±¾ÈËÏòÄãÍÆ¼öcoolbar×é¼þ¡£ËüÊÇÒ»ÖÖ¹¦ÄܸüΪ·á¸»µÄ¹¤¾ßÌõ£¬ÓÃËü¿ÉÒÔʹ¶à¸ö´«Í³µÄ¹¤¾ßÌõ¡¢±à¼­¿ò¡¢×éºÏÁбí¿ò¡¢Í¼ÏñÉõÖÁ¸ü¶àµÄ×é¼þ¼¯³Éµ½Ò»¸öͳһµÄcoolbarÖУ¬Ê¹µÃÓ¦ÓóÌÐò´°¿Ú¸üΪ½ô´Õ¡¢½çÃæ ......

Delphi¼üÅ̰´¼üαÂë

Delphi¼üÅ̰´¼üαÂë
Ó÷¨£ºif key = chr(VK_RETURN) then...
³£ÊýÃû³Æ Ê®Áù½øÖÆÖµ Ê®½øÖÆÖµ ¶ÔÓ¦°´¼ü
VK_LBUTTON 01 1 Êó±êµÄ×ó¼ü
VK_RBUTTON 02 2 Êó±êµÄÓÒ¼ü
VK-CANCEL 03 3 Contol-break Ö´ÐÐ
VK_MBUTTON 04 4 Êó±êµÄÖмü£¨Èý°´¼üÊó±ê)
VK_BACK 08 8 Backspace¼ü
VK_TAB 09 9 Tab¼ü
VK_CLEAR 0C 12 Clear¼ü
VK ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ