Поиск Locate по нескольким полям

[athleet]

Есть CheckListBox2 где находится список полей. Как сделать так, чтобы в LocFields добавлялись отмеченные поля?

Table1.Locate(LocFields,LocValues,LocOpts);

[chertovich]

Там через параметр типа Variable.
Лучше напиши свой метод Locate, это не сложно, если хоть немного знаком с наборами данных Delphi

[athleet]

Не смогу написать метод. Можно ведь как-то в переменную запихнуть 'Поле1;Поле2' ?

[Serge_Bliznykov]

посмотрите эту тему

и особенно мой пост #12

[athleet]

Спасибо.

[athleet]

Можно это как-то все в цикл записать, чтобы кода меньше было?

Я попробовал так,при этом в sEdit3 значения записываются вручную через ;

PHP код:

begin
   LocOpts:=[];
  
for i:=0 to sCheckListBox2.Items.Count - 1 do begin
 If (sCheckListBox2.Checked[i]=True) Then begin
  If (LocFields='') Then LocFields:= LocFields + sCheckListBox2.Items.Strings[i]
   Else LocFields:= LocFields + ';'+ sCheckListBox2.Items.Strings[i];
  
end;
 end;
DataModule2.Table1.Locate(LocFields,sEdit3.Text,LocOpts);
end;
end; 


Выдает ошибку EVarinatInvalidArgError InvalidArgument. Что означает я чего-то непонимаю, помогите =)