Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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³£Óÿì½Ý¼ü(ת)

£®pas ---- pascalµÄËõд, µ¥ÔªÔ­Ê¼³Ìʽµµ£¨ unit source files £©
£®dpr ---- ר°¸µµ ( project files )
£®dpk ---- °ü¹üԭʼ³Ìʽµµ/×é¼þ°ü ( package source files )
£®dfm ---- ±íµ¥µµ (¼Ç¼formµÄÄÚÈÝ,³ýÈ¥Õâ¸öÄÚÈݾ͵ÈÓÚɾ³ýÁËformÕâ¸ö±íµ¥)
£®dcu ---- ÊDZàÒëºÃµÄµ¥ÔªÎļþ.ÈôÖ»ÓÐÒ»¸ödcuÎļþ,Ôò²»ÄÜ¿´µ½Ô´´úÂë. ......

Delphi 7ʹÓÃADOConnection·ÃÎÊMySQL

½ñÌìÐÄѪÀ´³±ÔÚ×Ô¼ºµÄµçÄÔÉϰ²×°ÁËmysql-5.1.41-win32ºÍmysql-connector-odbc-5.1.6-win32¡£ÒÔǰ£¬ÎÒÔø¾­³¢ÊÔʹÓãģţ̣Уȣɣ¶È¥Áª½Ó£Í£Ù£Ó£Ñ£Ìµ«ÊÇÔÚÍøÉÏÕҺܶà×ÊÁ϶¼²»ºÜºÃÓ㻽ñÌìͻȻҲÏëÆðÕâ¸öÎÊÌâ¾Í¸ÉÆð»ØÀ´ÁË¡£
¡¡¡¡£±.¡¡½¨Á¢Êý¾Ý¿â
¡¡¡¡¡¡¡¡use mysql;
¡¡¡¡¡¡¡¡drop database myDB;
¡¡¡¡¡¡¡¡create database ......

delphiÖйØÓÚ×Ö·û´®Êý×éµÄÒ»¸öСBUG

¿´ÈçÏ´úÂ룺
var
   buffer:array [0..6] of char;
begin
    buffer:='delphi';
end;
±àÒëͨ¹ý
ÔÙ¿´ÈçÏ´úÂ룺
var
   buffer:array [1..7] of char;
begin
    buffer:='delphi';
end;
±àÒë´íÎó£º
Incompatible types: 'Array' and 'String'
Õæ²»ÖªµÀ ......

ÔΣ¬delphi 7 ÓÐÁ½¸ö°æ±¾µÄ SelectDirectory

ÒÔǰÓùýdelphi 2007µÄÕâ¸öº¯ÊýµÄ£¬²ÎÊý³¬¶à£¬ÏÖÔڵĹ«Ë¾ÓÃD7£¬½á¹ûÍøÉÏÒ»²éÕâ¸öº¯Êý£¬Óò»³ÉÁË£¬Ô­À´ÎÒÓôíÁ˺¯Êý
unit QDialogs;
{$IFDEF LINUX}
function SelectDirectory(const Caption, Root: WideString;
  var Directory: WideString; ShowHidden: Boolean = False): Boolean;
{$ENDIF}
{$IFDEF MSWINDOW ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ