什么是一些数据库?? 是一些数据库表吧。。
有几种方法,一是TTable控制,在设计时用字段编辑器产生固定字段。
这样可以用CreateTable方法产生数据库表。
二,可以用SQL语句和TQuery.

解决方案 »

  1.   

    你说的是建一些新的数据表吧!
    用TTable控件,
    VAR A TTABLE;
    PROC CREATE TTABLE(SENDER:??);
    BEGIN
      1.  CREATE A TTABLE;
      2.  ADD FIELDS TO A.FIELDS PROPERTY ACCORDING UR EXIST TABLE;
      3.  ASSIGN RELATIVE PROPERTY FOR UR NEW TABLE;
    END;
      

  2.   

    I HAVE MAKE A PROGRAM FOR THIS SUBJECT ONE YEARS AGO!
    IF U WANT 
    MAIL TO ME!
      

  3.   

    估计应该是数据表吧!可以有很多方法——SQL、动态程序等。下面是我常用的方法实现!
    Table1.DatabaseName='Dit';
    Table1.TableName='STRU';
    Table1.FieldDefs.Clear;
    Table1.FieldDefs.Add('STYLE',ftString,24,True);
    Table1.FieldDefs.Add('QUANTITY',ftInteger,0,True);
    Table1.FieldDefs.Add('RATIO',ftString,5,True);
    Table1.IndexDefs.Clear;
    Table1.IndexDefs.Add('STRU','STYLE',TIndexOptions()<<ixCaseInsensitive);
    Table1.CreateTable;