| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

API [D5, Win95/98]

sdan ©   (2002-02-28 17:38:00) 

Подскажите пожалуйста как получить переменную окружения PATH, соответствующая тем путям которые прописаны в autoexec.bat возможно это делается с помощью GetEnviroumentVariables объясните по подробнее есле можно.

---

vuk   (2002-02-28 20:42:00) [1]

В В6 в sysutils есть готовая функция. Делает то же самое, что и в примере VuDZ. Если у Вас более ранняя версия, то вот код:

function GetEnvironmentVariable(const Name: string): string;
var
Len: integer;
begin
Result := "";
Len := GetEnvironmentVariable(PChar(Name), nil, 0);
if Len > 0 then
begin
SetLength(Result, Len - 1);
GetEnvironmentVariable(PChar(Name), PChar(Result), Len);
end;
end;

---

VuDZ   (2002-02-28 19:40:00) [2]


char *c = ("path");
char *c2 = new char[1];
ZeroMemory(c2, 1);
DWORD dwErr = GetEnvironmentVariable(c, c2, 1);
if (dwErr){
delete c2;
c2 = new char[dwErr];
GetEnvironmentVariable(c, c2, dwErr);
printf(c2);
}


регист переменной не важен

---

Наверх