query1.Close;
  query1.SQL.Clear;
  query1.SQL.Add('select cyid,cyname,short_name,province,city,address');
  query1.SQL.Add(',phone,fax,zip,,linkaddr1,linkman1,linktel1,linkaddr2');
  query1.SQL.Add(',linkman2,linktel2,email,www,bank,accountno,accountname');
  query1.SQL.Add('where cyid='''+pcyid+'''');
  query1.Open;
  if query1.RecordCount=0 then
  begin
    application.MessageBox('确认查找值,没有对应记录','提示信息',48);
    exit;
  end;query1.RecordCount=0--这个就能判断是否存在记录了