with CustTable do
  Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P', '408-431-1000']), [loPartialKey]);

  1、使用“;”来分割多个字段名称，用VarArrayOf()来传递多个定位值。
  2、字段一定要和数据库完全一样，即使你用习惯了的空格也不行。虽然使得程序看起来跟清楚点，但是Locate不会自己做Trim，所以它把空格也当成字段名称的一部分。
  3、因为定位值采用Variants,所以定位就不知局限于字符串了。
  4、对于多栏查询的结果，一定要所有栏位全部符和才可以，只要有一栏不符合，就会返回False。

 Ok，关于Locate的用法就说到这里，写个小例子当作总结。

 var
  LocateSuccess: Boolean;
  SearchOptions: TLocateOptions;
  StrField,StrLocate:String;//字段名称，定位值
begin
  SearchOptions := [loCasesensitive,loPartialKey];
  LocateSuccess := CustTable.Locate(StrField,StrLocate, SearchOptions);
end;