小 小吴 Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-28 #1 我想利用一个已有的表的结构创建一个新表，输入数据后保存为物理文件， 例如： 已有table1.db，根据用户名创建user1.db,user2.db等。 是不是很简单，可我就是不会 (
V volan Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-28 #2 用TBatchMove试一试. 设置Mode为batCopy
F fx Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-29 #4 var table1,table2:ttable; begin table1:=Ttable.create(nil); table1.TableName :=原表名; table2:=Ttable.create(nil); table2.TableName :=目标表名; batchmove1.Mode :=batCopy; batchmove1.source:=table2; batchmove1.Destination:=table1; batchmove1.Execute ; end;
var table1,table2:ttable; begin table1:=Ttable.create(nil); table1.TableName :=原表名; table2:=Ttable.create(nil); table2.TableName :=目标表名; batchmove1.Mode :=batCopy; batchmove1.source:=table2; batchmove1.Destination:=table1; batchmove1.Execute ; end;
T tomye Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-29 #6 t: TTable; ... Table1.Active := True; t := TTable.Create(self); t.DatabaseName:="d:/creattab"; t.TableName:="BackUP.db"; t.Fielddefs.Assign(Table1.Fielddefs); table1.IndexDefs.Update; t.IndexDefs.Clear; t.IndexDefs.Assign(Table1.Indexdefs); t.CreateTable; t.BatchMove(Table1,batAppend); t.Close; 不要忘记给我加分哦？！
t: TTable; ... Table1.Active := True; t := TTable.Create(self); t.DatabaseName:="d:/creattab"; t.TableName:="BackUP.db"; t.Fielddefs.Assign(Table1.Fielddefs); table1.IndexDefs.Update; t.IndexDefs.Clear; t.IndexDefs.Assign(Table1.Indexdefs); t.CreateTable; t.BatchMove(Table1,batAppend); t.Close; 不要忘记给我加分哦？！
L LSS Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-29 #7 用SQL建表 CREATE TABLE ... 具体语法和例子见C:/Program Files/Borland/Borland Shared/BDE/localsql.hlp
小 小吴 Unregistered / Unconfirmed GUEST, unregistred user! 1999-04-30 #8 fx与tomye的方法类似，但tomye说得较详细，且表明可以直接创建一个数据表文件， 这正是我最想知道的。 谢谢所有热心的朋友。
((
(