如果用程序语言实现库复制(仅复制库结构)(50分)

  • 主题发起人 主题发起人 hyb
  • 开始时间 开始时间
H

hyb

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在程序中用语言实现将一个库的结构复制生成另一个库?
是否用于TTable和TQuery控件,如何实现?
 
STable是愿表
DTable是目标表

STable.Open;
for j:=0 to STable.FieldCount-1 do
begin
with STable.FieldDefs do
begin
DTable.FieldDefs.Add(
Items[j].Name,Items[j].DataType,Items[j].Size,False);
end;
end;
DTable.CreateTable;
 
也可以用标准的SQl语句创建数据表,
只要你通过TTable的FieldDefs将源数据表的结构提出来,其他的事就是做一个
Case语句,将不同的数据类型解释成目标表能够识别的数据类型,
创建数据表的标准语句可以查任何一本Sql语句的书。
 

NewTable.FieldDefs.Assign(OldTable.FieldDefs)
NewTable.TableName:=NewName
NewTable.CreateTable
 
用TBatchMove也可以,只是索引不能跟过去!
 
差不多了为什么不放分
 
多人接受答案了。
 
后退
顶部