Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add('SELECT * FROM ZW.BASIC_REPORT where occur_date >= ''' + DateToStr(Self.DateTimePicker1.Date) + ''' and occur_date <= ''' + DateToStr(Self.DateTimePicker2.Date) + ''' and department='''+ share.dep +''' and check_man='''+ Trim(ComboBox3.Text) +''' ');
  Query1.open;
Edit1.Text:=IntToStr(Query1.RecordCount);我把recordCount赋给edit.text,无论结果是多少,怎么显示是-1。请高手指点。