ÔÚ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ϵÁз½·¨´Ó×¢²á±í¶Áȡָ¶
Ïà¹ØÎĵµ£º
£®pas ---- pascalµÄËõд, µ¥ÔªÔʼ³Ìʽµµ£¨ unit source files £©
£®dpr ---- ר°¸µµ ( project files )
£®dpk ---- °ü¹üÔʼ³Ìʽµµ/×é¼þ°ü ( package source files )
£®dfm ---- ±íµ¥µµ (¼Ç¼formµÄÄÚÈÝ,³ýÈ¥Õâ¸öÄÚÈݾ͵ÈÓÚɾ³ýÁËformÕâ¸ö±íµ¥)
£®dcu ---- ÊDZàÒëºÃµÄµ¥ÔªÎļþ.ÈôÖ»ÓÐÒ»¸ödcuÎļþ,Ôò²»ÄÜ¿´µ½Ô´´úÂë.
......
½ñÌìÐÄѪÀ´³±ÔÚ×Ô¼ºµÄµçÄÔÉϰ²×°ÁËmysql-5.1.41-win32ºÍmysql-connector-odbc-5.1.6-win32¡£ÒÔǰ£¬ÎÒÔø¾³¢ÊÔʹÓãģţ̣Уȣɣ¶È¥Áª½Ó£Í£Ù£Ó£Ñ£Ìµ«ÊÇÔÚÍøÉÏÕҺܶà×ÊÁ϶¼²»ºÜºÃÓ㻽ñÌìͻȻҲÏëÆðÕâ¸öÎÊÌâ¾Í¸ÉÆð»ØÀ´ÁË¡£
¡¡¡¡£±.¡¡½¨Á¢Êý¾Ý¿â
¡¡¡¡¡¡¡¡use mysql;
¡¡¡¡¡¡¡¡drop database myDB;
¡¡¡¡¡¡¡¡create database ......
¿´ÈçÏ´úÂ룺
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 2007µÄÕâ¸öº¯ÊýµÄ£¬²ÎÊý³¬¶à£¬ÏÖÔڵĹ«Ë¾ÓÃD7£¬½á¹ûÍøÉÏÒ»²éÕâ¸öº¯Êý£¬Óò»³ÉÁË£¬ÔÀ´ÎÒÓôíÁ˺¯Êý
unit QDialogs;
{$IFDEF LINUX}
function SelectDirectory(const Caption, Root: WideString;
var Directory: WideString; ShowHidden: Boolean = False): Boolean;
{$ENDIF}
{$IFDEF MSWINDOW ......