这里 Explorer 没有建立 assss .我想动态建立,不然以后使用程序的每一台计算机都需要从配置 Database2.Close();
Database2.Params.Clear;
Database2.DatabaseName:='jhtchina';
Database2.AliasName:='assss' ;
Database2.Params.Add('PATH='+strexe_FileName);
Database2.Params.Add('ENABLE BCD=FALSE');
Database2.Params.Add('DEFAULT DRIVER=PARADOX');
Database2.LoginPrompt:=false;
...
Table1.DatabaseName:='jhtchina';
Table1.TableName:='SBA99.DB';
...
Table1.Open(); // SBA99 数据表,这时SBA99 为空
Database2.Params.Clear;
Database2.DatabaseName:='jhtchina';
Database2.AliasName:='assss' ;
Database2.Params.Add('PATH='+strexe_FileName);
Database2.Params.Add('ENABLE BCD=FALSE');
Database2.Params.Add('DEFAULT DRIVER=PARADOX');
Database2.LoginPrompt:=false;
...
Table1.DatabaseName:='jhtchina';
Table1.TableName:='SBA99.DB';
...
Table1.Open(); // SBA99 数据表,这时SBA99 为空
Database2.Close();
Database2.Params.Clear;
Database2.DatabaseName:='jhtchina';
//Database2.AliasName:='DefaultDD' ;
Database2.DriverName:='STANDARD'; //这里是动态建立
Database2.Params.Add('PATH='+strexe_FileName);
Database2.Params.Add('ENABLE BCD=FALSE');
Database2.Params.Add('DEFAULT DRIVER=PARADOX');
Database2.LoginPrompt:=false;
问题解决,没有人来领分 .