Вверх ↑
Пакеты 
HiAsm4
Windows 
Компоненты 
Инcтpумeнты 
Общие - EnvVars

EnvVars
Краткое описание
  Компонент предназначен для работы с переменными окружения
Параметры
  • String - Строка для преобразования по умолчанию
  • Name - Имя переменной окружения по умолчанию
  • Value - Значение переменной окружения для метода doSet по умолчанию
  • Методы
  • doExpand - Разворачивает переменные окружения в строке String ARG(String)
  • doEnum - Перечисляет доступные переменные окружения
  • doGet - Получает значение переменной окружения по имени Name ARG(Name)
  • doSet - Устанавливает переменной окружения Name новое значение Value (только для текущего процесса) ARG(Name, Value)
  • doDelete - Удаляет переменную окружения Name (только для текущего процесса) ARG(Name)
  • События
  • onExpand - Событие происходит всякий раз после разворачивания переменных окружения в строке, выдавая результирующую строку в поток ARG(String)
  • onEnum - Событие происходит всякий раз при получении очередной переменной окружения, выдавая ее имя и значение в поток ARG(EnvVarString)
  • onEndEnum - Событие происходит после завершения перебора всех переменных окружения
  • onGet - Событие происходит всякий раз при получении значения переменной окружения, выдавая полученное значение в поток ARG(Value)
  • Свойства
  • Result - Содержит результат выполнения текущей операции
  • Данные
  • String - Строка для преобразования
  • Name - Имя переменной окружения
  • Val - Значение переменной окружения для метода doSet
  • Пример
      Пример использования компонента EnvVars

    
    #sha
    Add(MainForm,5079404,168,252)
    {
    Width=494
    Height=307
    Caption="EnvVars"
    Position=1
    }
    Add(Button,15719851,168,322)
    {
    Left=210
    Top=140
    TabOrder=-1
    Caption="Enum"
    link(onClick,6861056:doEvent1,[])
    }
    Add(Memo,2869939,560,350)
    {
    Width=478
    Height=135
    Align=2
    Font=[Courier New,10,0,0,204]
    ScrollBars=2
    }
    Add(Charset,14466227,497,350)
    {
    link(onCharset,2869939:doAdd,[])
    }
    Add(Edit,7551505,392,266)
    {
    Left=5
    Top=165
    Width=195
    Text="TEMP"
    }
    Add(Button,1042754,168,357)
    {
    Left=210
    Top=165
    TabOrder=-1
    Caption="Get"
    link(onClick,1464180:doGet,[])
    }
    Add(Edit,14225225,434,266)
    {
    Left=5
    Top=215
    Width=195
    Text="Value"
    }
    Add(Button,5744039,168,392)
    {
    Left=210
    Top=215
    TabOrder=-1
    Caption="Set"
    link(onClick,420439:doEvent1,[])
    }
    Add(Hub,6861056,266,322)
    {
    InCount=3
    link(onEvent1,2869939:doClear,[(540,328)(540,363)])
    link(onEvent2,1464180:doEnum,[(295,335)(295,356)])
    }
    Add(Button,15926932,168,427)
    {
    Left=210
    Top=190
    TabOrder=-1
    Caption="Del"
    link(onClick,390878:doEvent1,[])
    }
    Add(EnvVars,1464180,385,343)
    {
    Point(String)
    Point(Name)
    Point(Value)
    Point(doEnum)
    Point(doGet)
    Point(doSet)
    Point(doDelete)
    Point(onEnum)
    Point(onGet)
    Point(Result)
    link(onExpand,7624377:doText,[(436,349)(436,335)])
    link(String,16506608:Text,[(391,317)(356,317)])
    link(Name,7551505:Text,[])
    link(Value,14225225:Text,[(405,317)(440,317)])
    link(onEnum,14466227:doCharset,[])
    link(onGet,10285969:doText,[(436,363)(436,377)])
    }
    Add(Edit,16506608,350,266)
    {
    Left=5
    Top=240
    Width=195
    Text="%WINDIR%\explorer.exe"
    }
    Add(Edit,10285969,455,371)
    {
    Left=275
    Top=165
    Width=195
    Text="Result"
    }
    Add(Edit,7624377,455,329)
    {
    Left=275
    Top=240
    Width=195
    Text="String"
    }
    Add(Button,3490455,168,287)
    {
    Left=210
    Top=240
    TabOrder=-1
    Caption="Expand"
    link(onClick,1464180:doExpand,[(306,293)(306,349)])
    }
    Add(Hub,420439,217,392)
    {
    link(onEvent1,1464180:doSet,[(295,398)(295,370)])
    link(onEvent2,6861056:doEvent2,[(243,405)(243,335)])
    }
    Add(Hub,390878,217,427)
    {
    link(onEvent1,1464180:doDelete,[(306,433)(306,377)])
    link(onEvent2,6861056:doEvent3,[(255,440)(255,342)])
    }

    Замечания
    Обновление элемента: [svn]EnvVars.pas[/svn]
    BB-code статьи для вставки
    Всего комментариев: 0
    (комментарии к статье еще не добавлены)
    Комментарий
    ...