Вверх ↑
Пакеты 
HiAsm4
Windows 
Компоненты 
Интерфейс 2 
Строковая таблица MT - MST_Selected

MST_Selected
Краткое описание
Клиентский модуль MTStrTbl для управления выбранными строками. Применяется, в основном, при MultiSelect=True
Параметры
  • MSTControl - Управление элементом MTStrTbl
  • Свойства
  • SelectArray - Массив состояния выделенных строк (0 - не выбран, 1 - выбран)
  • AllSelect - Содержит индексы выделенных пунктов, как элементы MT
  • Аргументы
  • AllSelect - [IndexSelectRow1][IndexSelectRow2] ... [IndexSelectRowN]
  • Примеры
      Пример определения индексов выделенных строк в таблице
    
    Add(MainForm,3063237,119,119)
    {
    Width=398
    Height=226
    link(onCreate,1976442:doEnum,[])
    }
    Add(MTStrTbl,15043066,119,182)
    {
    Width=390
    Height=170
    Name="MTStrTbl"
    Columns=#3:Имя|7:Фамилия|8:Отчество|
    CheckBoxes=0
    MultiSelect=0
    }
    Add(StrList,4383086,161,63)
    {
    Strings=#20:Иван;Иванов;Иванович|24:Андрей;Андреев;Андреевич|21:Гадя;Хренова;Петрович|
    }
    Add(ArrayEnum,1976442,175,133)
    {
    link(onItem,16356153:doMT,[])
    link(Array,4383086:Array,[])
    }
    Add(MST_RowAction,15395190,273,126)
    {
    MSTControl="MTStrTbl"
    }
    Add(MT_String,16356153,224,126)
    {
    link(onResult,15395190:doRowAction,[])
    }
    Add(PointHint,5981647,252,252)
    {
    Info=#40:Пример использования модуля MST_Selected|
    Transparent=0
    VAlign=0
    Width=211
    Height=123
    }
    Add(MST_Selected,14407336,315,287)
    {
    MSTControl="MTStrTbl"
    }
    Add(Label,3866195,231,168)
    {
    Top=170
    Width=148
    Height=17
    Caption="Индексы выделенных строк"
    }
    Add(Edit,4775083,413,329)
    {
    Left=150
    Top=170
    Width=240
    Text=""
    }
    Add(Timer,2418270,273,329)
    {
    Interval=500
    link(onTimer,2787713:doAdd,[])
    }
    Add(MT_String,8576929,364,329)
    {
    link(onResult,4775083:doText,[])
    }
    Add(MT_Add,2787713,322,329)
    {
    link(onAdd,8576929:doStr,[])
    link(Data,14407336:AllSelect,[])
    }
      Пример пересылки выбранных строк из одной таблицы в другую
    
    Add(MainForm,2953706,119,140)
    {
    Width=382
    Height=505
    Caption="GetMultiSelect"
    Position=1
    link(onCreate,790530:doEnum,[])
    }
    Add(MTStrTbl,9555050,329,140)
    {
    @Color=11184895
    Left=5
    Top=5
    Width=360
    Height=210
    Name="tab"
    Columns=#3:Имя|7:Фамилия|8:Отчество|
    MultiSelect=0
    }
    Add(StrList,14566720,154,91)
    {
    Strings=#20:Иван;Иванов;Иванович|24:Андрей;Андреев;Андреевич|21:Гадя;Хренова;Петрович|23:Сидоров;Сидор;Сидорович|22:Васюков;Петр;Сергеевич|
    }
    Add(ArrayEnum,790530,168,154)
    {
    link(onItem,9631054:doMTString,[])
    link(Array,14566720:Array,[])
    }
    Add(MT_String,9631054,224,140)
    {
    link(onResult,16723298:doRowAction,[])
    }
    Add(MST_RowAction,16723298,280,140)
    {
    @Color=11184895
    MSTControl="tab"
    }
    Add(Button,7162282,70,245)
    {
    Left=60
    Top=225
    Width=240
    TabOrder=-1
    Caption="Получить выбранные строки"
    link(onClick,2940461:doClear,[])
    }
    Add(MTStrTbl,4881026,379,252)
    {
    @Color=16755370
    Left=5
    Top=250
    Width=360
    Height=210
    Name="tab_2"
    Columns=#3:Имя|7:Фамилия|8:Отчество|
    MultiSelect=0
    }
    Add(MST_Selected,1404927,168,196)
    {
    @Color=11184895
    MSTControl="tab"
    }
    Add(MST_ArrayRows,3293888,280,196)
    {
    @Color=11184895
    MSTControl="tab"
    }
    Add(MT_MTArrayRW,7022694,280,252)
    {
    link(onRead,4264146:doRowAction,[])
    link(Array,3293888:Strings,[])
    link(Index,5316292:Index,[(293,240)(237,240)(237,289)(181,289)])
    }
    Add(MST_RowAction,4264146,329,252)
    {
    @Color=16755370
    MSTControl="tab_2"
    }
    Add(ArrayEnum,5316292,168,245)
    {
    link(onItem,8842106:doCase,[])
    link(Array,1404927:SelectArray,[])
    }
    Add(MST_Clear,2940461,119,245)
    {
    @Color=16755370
    MSTControl="tab_2"
    link(onChange,5316292:doEnum,[])
    }
    Add(Case,8842106,217,245)
    {
    Value=Integer(1)
    link(onTrue,7022694:doRead,[])
    }
    Замечания
    Обновление элемента: [svn]MST_Selected.pas[/svn]
    BB-code статьи для вставки
    Всего комментариев: 0
    (комментарии к статье еще не добавлены)
    Комментарий
    ...