home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 8 / CDASC08.ISO / NEWS / 552 / TUTOR05.PAS < prev    next >
Pascal/Delphi Source File  |  1993-10-07  |  373b  |  18 lines
  1. program Tutor05;
  2. {$N+,E+}          {Required for floating point number handling}
  3. uses
  4.    GSOB_DBF;
  5. var
  6.    MyFile : GSO_DB3Build;
  7. begin
  8.    with MyFile do
  9.    begin
  10.       Init('TUTOR5');
  11.       InsertField('FIELD1','C',8,0);
  12.       InsertField('SECOND','D',8,0);
  13.       InsertField('THIRD','L',1,0);
  14.       InsertField('FOURTH','N',6,2);
  15.       Done;
  16.    end;
  17. end.
  18.