IDimOrmCondition.SetTextCriteria

Синтаксис

SetTextCriteria(Value: IDimTextCriteria);

Параметры

Value. Условие поиска.

Описание

Метод SetTextCriteria определяет условие поиска по тексту атрибутов.

Пример

В рассматриваемом примере на форме располагаются компоненты: UiDimension, DimensionTree, Button, EditBox. Для кнопки описано событие OnClick.

Class UserForm: Form

cmdSearch: Button;

uidim: UiDimension;

tree: DimensionTree;

txtPattern: EditBox;

 

Sub Button1OnClick(Sender: Object; Args: IEventArgs);

Var

pMan : IDimOrmManager;

pClass : IDimOrmClass;

pCondition : IDimOrmCondition;

pCriteria : IDimTextCriteria;

Begin

pMan := New DimOrmManager.Create;

pClass := pMan.CreateClass(uidim.Dimension);

pCondition := pClass.CreateCondition;

pCriteria := New DimTextCriteria.Create;

pCriteria.CriteriaOptions := TextCriteriaOptions.FreeText Or TextCriteriaOptions.SearchStringAttributes;

pCriteria.Text := txtPattern.Text;

pCondition.SetTextCriteria(pCriteria);

pCondition.SelectElements(tree.Selection);

End Sub Button1OnClick;

End Class UserForm;

После запуска формы необходимо ввести текст для поиска и нажать на кнопку, после чего отметка в дереве будет изменена: будут выделены только те элементы, у которых по какому-нибудь атрибуту будет найден искомый текст.

См. также:

IDimOrmCondition