Add ftstring in TDBF error.
lazarus / 16-Databases

----------------------------------------------------------------------
Roger king · 2011-02-26 21:30

I have copied the following example from the forum:-

  Dbf1.FilePath:= 'data/';
  Dbf1.TableLevel := 4;
  Dbf1.Exclusive := True;
  Dbf1.TableName:='testdata.dbf';
  with Dbf1.FieldDefs do begin
    Add('Id', ftString, 4, True);
    Add('Name', ftString, 30, True);
  end;
  Dbf1.CreateTable;
  Dbf1.Open;
  Dbf1.AddIndex('custid', 'Id', [ixPrimary, ixUnique]);
  Dbf1.AddIndex('custname', 'Name', [ixCaseInsensitive]);
  Dbf1.Close;

When I try to run it I get the following message:-

psword_02.pas(71,30) Error: Identifier not found "ftString".

I think that I must have something missing in my Uses section. Can
anyone tell what the problem is?

Regards

Roger

 and am trying to use it but I get the fo

----------------------------------------------------------------------
marcov · 2011-02-26 21:49

Import unit DB. It has some declarations that are the same for all
database backends

----------------------------------------------------------------------
Roger king · 2011-02-26 21:56

Thanks, marcov, that did the trick. I had DB in my main form, but I
was doing the dbf creation from another form, so I hadn't realised
that it was needed in the second form.

Regards

Roger