Q:  How do I use a locate() with multiple fields?

A:

procedure TForm1.Button2Click(Sender: TObject);
var
  vList: variant;
begin
  vList := VarArrayCreate([0, 1], varVariant);
  vList[0] := 'Christiansted';
  vList[1] := 'VIP Divers Club';
  table1.locate('city;company', vList, []);
end;