![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как в сессии изменить значение NLS_LANG ? [D5]
ANT1 © (2004-10-04 18:38:00)Подскажите, как в процессе выполнения приложения можно изменить параметр NLS_LANG в НKEY_LOCAL_MACHINE\Oracle\Home0\NLS_LANG
Vlad (2004-10-04 19:48:00) [1]
> ANT1 (04.10.04 18:38)
> Подскажите, как в процессе выполнения приложения можно изменить
> параметр NLS_LANG в НKEY_LOCAL_MACHINE\Oracle\Home0\NLS_LANG
Где менять-то надо - в реестре или в сессии?
Это я к тому что название темы с содержимым как-то не очень вяжется
Для изменения параметров сессии служит конструкция
ALTER SESSION SET ... см. доки по Ораклу
panov (2004-10-04 19:18:00) [2]
procedure SetRegistryKeyBDE;
var
reg: TRegistry;
NumHomes: String;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_LOCAL_MACHINE;
if reg.OpenKey('\SOFTWARE\ORACLE\ALL_HOMES',False) then
begin
NumHomes := reg.ReadString('LAST_HOME');
reg.CloseKey;
end;
if reg.OpenKey('\SOFTWARE\ORACLE\HOME'+NumHomes,False)
then reg.WriteString('NLS_LANG','AMERICAN_AMERICA.RU8PC866');
finally
reg.CloseKey;
reg.Free;
end;
end;