Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Как получить переменные окружения типа PATH и PROMPT

Delphi , ОС и Железо , Переменные окружения

Как получить переменные окружения типа PATH и PROMPT


Хакер идет по улице, в руках держит BFG 9000. Навстречу ему братки крутые:
- Ты где такую феню взял, в натуре?!
А он лениво так:
- Да из Дума, Дебаггером дернул...

Для этого используется API функция GetEnvironmentVariable.

GetEnvironmentVariable возвращает значения:

  • В случае удачного выполнения функции, возвращаемое значение содержит количество символов, хранящихся в буфере, не включая последнего нулевого.
  • Если указанная переменная окружения для текущего процесса не найдена, то возвращаемое значение равно нулю.
  • Если буфер не достаточного размера, то возвращаемое значение равно требуемому размеру для хранения строки значения и завершающего нулевого символа.

function GetDOSEnvVar(const VarName: string): string;
var
  i: integer;
begin
  Result := '';
  try
    i := GetEnvironmentVariable(PChar(VarName), nil, 0);
    if i > 0 then
    begin
      SetLength(Result, i);
      GetEnvironmentVariable(Pchar(VarName), PChar(Result), i);
    end;
  except
    Result := '';
  end;
end;

Статья Как получить переменные окружения типа PATH и PROMPT раздела ОС и Железо Переменные окружения может быть полезна для разработчиков на Delphi и FreePascal.


Комментарии и вопросы


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: Переменные окружения ::


реклама

::


©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru Rambler's Top100
18.02.2020 18:36:08/0.012247085571289/2