Query.recordcount always gives 1 record ?

Hi

Can anyone help me with this problem.

I hava a Paradox table. When I use a Query, and I know for certain, that the result will be an empty query, the recordcount of that query gives me 1 record instead of 0 . When there is one record that matches the query, the recordcount is also one !!!

quid ?

thx a lot
mariowayAsked:
Who is Participating?
 
esoftbgConnect With a Mentor Commented:
Try to use another query when you need to know the count of records:

function  TForm1.CountOfRecords(TableName: string): Integer;
var
  Count: Integer;
begin
  Count := 0;
  try
    QueryCount.Active := False;
    QueryCount.SQL.Text :=''
                        + 'SELECT COUNT(*) FROM '
                        + TableName
                        + '';
    QueryCount.Active := True;
    Count := QueryCount.Fields[0].AsInteger;
  finally
    Result := Count;
  end;
end;

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  EditCount.Text := IntToStr(CountOfRecords('EMPLOEE'));
end;
0
 
mariowayAuthor Commented:
Thank You very much esoftbg

Marioway
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.