function ReadRecord(dbf, r :integer): integer;

ReadRecord reads the specified record from a dbf file to internal memory.
It returns 0 if the function failed. Usually you do not need to check a return value.

var
  dbf :integer;
  r :integer;
begin
  dbf := OpenBase( 'filename.dbf' );
  if dbf <> 0 then
  begin
    for r := 0 to RecCount(dbf)-1 do
      ReadRecord(dbf, r);
    CloseBase(dbf);
  end;
end.