Finding Paradox records from witnin Delphi

I have a paradox 7 table with two keys, the primary key is a field called ID and the secondary key is a field called CWWORD.  I have a normally edit component on a form in which the user enters the word they want to search for.

What need to do is determine whether the record exists.

This is what I think is the correct method of doing this :)

Table.Active := True;
Table.IndexName := CWWORD;
if Table.FindKey(Edit.Text) then
  record found
else
  record not found;

This piece of code doesn't work but but I know it's something similiar.  Can you help ?

neldAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
jhunConnect With a Mentor Commented:
The findkey takes an array of const as a parameter. Try this:

with Table do
begin
  EditKey;
  FieldByName('CWWORD').AsString := Edit.Text;
  if GotoKey then
   rec found
  else rec not found

gr. John

end;
0
 
bijoynCommented:
since u know that the fieldname is ID what u can do is

if Table1.Locate('ID',Edit1.Text,[]) then
   Showmessage('Found')
else
   Showmessage('Not Found');

----------------------
The above code should help find the records u are looking for in a table. If the key has multiple columns then separate the column names by comma. and the same for the values which will be shown as [value1, value2...] etc.

Bijoy

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.