Paradox DB

Witam.

Jak mozna programowo utworzyc baze danych Paradox?

(Delphi 7 Enterprise)

Pozdrowienia,
Robert

Help Delphi

if not Table1.Exists then begin
  with Table1 do begin

    Active := False;  

    DatabaseName := 'DBDEMOS';
    TableType := ttParadox;
    TableName := 'CustInfo';
    { Next, describe the fields in the table }
    with FieldDefs do begin
      Clear;
      with AddFieldDef do begin

        Name := 'Field1';
        DataType := ftInteger;
        Required := True;
      end;
    CreateTable;
  end;
end;