CREATE FILT FROM ARR — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
(не показана одна промежуточная версия этого же участника)
Строка 9: Строка 9:
 
Результат
 
Результат
 
  KOD = 1 or KOD = 2
 
  KOD = 1 or KOD = 2
= Текст =
+
= Пример =
  parameters _field, _arr
+
  create_filt_from_arr
+
local i, filt
+
+
if [[IsEmpty]]( _arr ) or [[Empty]]( _field )
+
  result := ''
+
  return
+
endif
+
+
filt := ""
+
+
for i := 1 to [[len]]( _arr )
+
  if [[ValType]]( _arr[i] ) = 'C'
+
    filt := filt + iif( [[Empty]]( filt ), [], [ or ] ) + _field + [ = '] + _arr[ i ] + [' ]
+
  else
+
    filt := filt + iif( [[Empty]]( filt ), '', ' or ' ) + _field + ' = ' + _arr[ i ]
+
  endif
+
next
+
+
result := filt
+
 
= Смотрите также =
 
= Смотрите также =
 
[[Полезные функции]]
 
[[Полезные функции]]
  
 
[[Функции Delphi]]
 
[[Функции Delphi]]

Текущая версия на 14:56, 28 января 2020

CREATE_FILT_FROM_ARR - это программа из справочника R266

Создание фильтра для последующей передачи, например, в ChoiceRefr

CREATE_FILT_FROM_ARR( _field, _arr )

_field - имя поля, например, 'KOD'

_arr - массив значений, например, { 1, 2 }

Результат

KOD = 1 or KOD = 2

Пример

create_filt_from_arr

Смотрите также

Полезные функции

Функции Delphi