关于打包的路径问题。
cow8063(吴七郎) :以上这些我都做了。
if ComponentIsItemSelected (MEDIA, "BDE驱动") then
szClass="";
KeyBLW32="SOFTWARE\\Borland\\BLW32";
nResult = CreateRegistrySet( "" );
RegDBSetDefaultRoot ( HKEY_LOCAL_MACHINE );
RegDBCreateKeyEx ( KeyBLW32 , szClass );
RegDBSetKeyValueEx ( KeyBLW32 , "BLAPIPATH" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB1" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\USA.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB2" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\EUROPE.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB3" , REGDB_STRING , PROGRAMFILES^"\\Borland\\Common Files\\BDE\\CEEUROPE.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB4" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\CHARSET.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB5" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\OTHER.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB6" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\FAREAST.BLL" , -1 );
RegDBSetKeyValueEx ( KeyBLW32 , "LOCALE_LIB7" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\JAPAN.BLL" , -1 );
KeyDbEngine="SOFTWARE\\Borland\\Database Engine";
RegDBCreateKeyEx ( KeyDbEngine , szClass );
RegDBSetKeyValueEx ( KeyDbEngine , "CONFIGFILE01" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE\\IDAPI.CFG" , -1 );
RegDBSetKeyValueEx ( KeyDbEngine , "DLLPATH" , REGDB_STRING , PROGRAMFILES^"Borland\\Common Files\\BDE" , -1 );
RegDBSetKeyValueEx ( KeyDbEngine , "RESOURCE" , REGDB_STRING , "0009" , -1 );
RegDBSetKeyValueEx ( KeyDbEngine , "SaveConfig" , REGDB_STRING , "WIN32" , -1 );
RegDBSetKeyValueEx ( KeyDbEngine , "UseCount" , REGDB_STRING , "5" , -1 );
endif;
nResult = CreateRegistrySet( "" );
return nResult;
但是如我在BDE中建的别名lai,其对应路径是d:\ev,可是打包安装到另一台机子后,其lai还是指到d:\ev的。并没有附着安装路径的改变而改变,是不是少写了一句话。如大师指点一下,一定谢谢。(在打BDE的文件时,我索性把BDE目录下所有的文件全打在包里)