Кодировка в переменной среды Windows XP

[RunetX]

Здравствуйте.

Присваиваю Edit значение переменной GetEnvironmentVariableUTF8('APPDATA'). В переменной содержится имя пользователя на кириллице. В Windows 7 и выше не выявлено никаких проблем, однако в Windows XP (Home Edition SP3) вместо кириллицы каракули неизведанной этимологии.

Тупым перебором совершались попытки перекодировать SysUtils.GetEnvironmentVariable с помощью функций CP850ToUTF8, CP866ToUTF8, CP1250ToUTF8, CP1251ToUTF8, CP1252ToUTF8, AnsiToUTF8. Результат ноль.

Как в Windows XP корректно получить значение в Edit из переменной среды?

[xcod]

WinCPToUTF8
UTF8ToWinCP

[Лекс Айрин]

кои8р пробовал?

[RunetX]

WinCPToUTF8
UTF8ToWinCP

Тоже пробовал, забыл упомянуть

winxpenc.png

Добавлено спустя 7 минут 46 секунд:

кои8р пробовал?

GuessEncoding() показывает CP1251, однако CP1251ToUTF8 дает каракули (AnsiToUTF8 тоже).

[Little_Roo]

модуль LConvEncoding подключен?

[RunetX]

модуль LConvEncoding подключен?

Угу

[sts]

viewtopic.php?t=6031&p=44277
????

[Ustas]

А функция GetUserDir как работает?

[RunetX]

http://freepascal.ru/forum/viewtopic.php?t=6031&p=44277
????

Много нового узнал, но увы, получить в нормальной кодировке значение так и не вышло.
Я новичок в Lazarus и программировании. Ткните, пожалуйста, поконкретней.

P. S. Windows Home Edition (когда-то вроде попадался момент с урезкой кодировок в хомяке)

Добавлено спустя 4 минуты 34 секунды:

А функция GetUserDir как работает?

CP1251ToUTF8(GetUserDir) - все ок

Просто хотел брать значение %APPDATA%, чтобы не выяснять версию Windows (AppData или Application Data и где лежит)

[Ustas]

Есть еще GetAppConfigDir(False).

[RunetX]

Есть еще GetAppConfigDir(False).

Ведет в Local Settings.

Мне необходимо получить полный путь к к файлу списка информационных баз 1С ibases.v8i (сейчас на Windows XP это C:\Documents and Settings\Инна\Application Data\1C\1CEStart , но программа может запускаться на разных версиях Windows и как правило с кириллицей в системных путях)

[Ustas]

А такой вариант: http://www.webdelphi.ru/2010/02/shfolder-eshhyo-odin-sposob-kak-poluchit-puti-k-specialnym-direktoriyam/
XP нет, а то бы сам попробовал...

[RunetX]

Ребята, всем спасибо. Этот косяк воспроизводится только при запуске из IDE и не наблюдается в рантайме.