TbtkLookupData

class TbtkLookupData

Информация о выбранных записях в lookup-форме, возвращаемая методом TbtkScriptSelectionObject.DoLookup().

LookupResult → TLookUpResult

Результат выбора записей в lookup-форме. {lrOk, lrCancel}.

Return type:

TLookUpResult

Пример использования

<pascal>
  R := DoLookup('TbtkLookupGridForm', 'maintree', ['id'], [2629000], ['id', 'sParentClass'], true);

  if R.LookupResult = lrOk then
    MessageDlg(VarToStr(R.Data(0, 1)) + '->' + R.Data(1, 1), mtWarning, 'mbYes', 0 );
</pascal>

RecCount → Integer

Количество записей главной выборки lookup-формы. Если массив ResultFieldNames из метода TbtkScriptSelectionObject.DoLookup() пустой, то количество записей всегда равно 0.

Return type:

Integer

До этого момента метод возвращал суммарное (по всем выборкам, указанным в ResultFieldNames и в системной выборке EntityName) количество записей, выбранных пользователем.

Data(FieldId: Variant; RecordIndex: Integer) → Variant

Метод возвращает значение поля FieldId для записи с номером RecordIndex из главной выборки lookup-формы. Записи нумеруются от 1, поля от 0.

Parameters:

• FieldId (Variant) – Номер или системное имя поля.

• RecordIndex (Integer) – Номер записи

Return type:

Variant

Пример использования

  doLookupResData.Data(0 , 1); // значение из первого поля для первой записи
  doLookupResData.Data('ID' , 1); // значение поля "ID" для первой записи

SelectData(EntityName: String) → TbtkLookupSelectionData

Метод возвращает TbtkLookupSelectionData - информацию о выбранных записях в выборке EntityName.

Parameters:

EntityName (String) – Имя выборки

Return type:

TbtkLookupSelectionData