请问如何动态创建连接access库的bde别名

Question

session.AddAlias();参数请参看BDE里的参数

Answer 1

TDatabase本身就可临时建别名,远行完即消失,我一直就这样用.
双击你的Database1就可以建了

Answer 2

我用的database连接的别名要变化

Answer 3

var  MyList: TStringList;
begin
  MyList := TStringList.Create;
  try
    with MyList do
    begin
      Add('SERVER NAME=IB_SERVER:/PATH/DATABASE.GDB');
      Add('USER NAME=MYNAME');
    end;
    Session1.AddAlias('NewIBAlias', 'INTRBASE', MyList);
  finally
    MyList.Free;
  end;
end;

Answer 4

//prodax
begin
  Session1.AddAlias('NewPAlias', '','c:\sdfak');
end

Answer 5

建议使用Adoconnection+adotable(adoquery)设置简单，运行效率高。