• Registered: 2017-05-30
  • Posts: 254

Topic: Как получить множество id выбранных TableGrid записей?

Включил в таблице свойство goMultiSelect.
Пользователь с помощью Ctrl или Shift+Ctrl выбирает несколько отдельных строк или диапазонов строк.
Каким образом можно получить массив id выбранных пользователем строк, чтобы сделать по ним скриптом сложные запросы?

  • From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Re: Как получить множество id выбранных TableGrid записей?

mikhail_a wrote:

Включил в таблице свойство goMultiSelect.
Пользователь с помощью Ctrl или Shift+Ctrl выбирает несколько отдельных строк или диапазонов строк.
Каким образом можно получить массив id выбранных пользователем строк, чтобы сделать по ним скриптом сложные запросы?

делал для вывода в отчет выбранных в гриде записей

   if frmCompanyServiceWork.tgCompanyWork.SelectedColumn then
     begin
       c := frmCompanyServiceWork.tgCompanyWork.RowCount-1;
         for i := 0 to c do
          begin
          if frmCompanyServiceWork.tgCompanyWork.Selected[i] then s := s +IntToStr(frmCompanyServiceWork.tgCompanyWork.dbIndexToID(i)) + ' OR ';
        end;
        if s <> '' then
      begin
    SetLength(s, Length(s)-4);
    SQLQuery('SELECT companyServiceWork.id AS "'+langIniG.ReadString('reportmess','dr48', '')+'", companyServiceWork.nameServise AS "'+langIniG.ReadString('reportmess','dr82', '')+'", companyServiceWork.priceServise AS "'+langIniG.ReadString('reportmess','dr83', '')+'", companyServiceWork.dateServiseCompany  AS "'+langIniG.ReadString('reportmess','dr84', '')+'" ,'+
             'companyServiceWork.klVo AS "'+langIniG.ReadString('reportmess','dr42', '')+'",'+
             'Company.nameCompany AS "'+langIniG.ReadString('reportmess','dr73', '')+'", telCompany AS "'+langIniG.ReadString('reportmess','dr74', '')+'", streetCompany AS "'+langIniG.ReadString('reportmess','dr75', '')+'", houseCompany AS "'+langIniG.ReadString('reportmess','dr76', '')+'", fractionCompany AS "'+langIniG.ReadString('reportmess','dr77', '')+'", officeCompany AS "'+langIniG.ReadString('reportmess','dr78', '')+'" '+
             'FROM companyServiceWork '+
             'LEFT OUTER JOIN Company ON Company.id=companyServiceWork.id_Company '+
             'WHERE companyServiceWork.id='+s, ServiceWork);
    end;
   end