怎样用bde administrator或者sql server设置别名？

[qsyang]

就是李维在电子商务版里第14页讲的那样，现在其他部分我已经设置好了，如何实现设置别名呢？谢谢！

[lwk_hlj]

很好做的啊，我回答过啊
你找找以前的贴子吧

[cobi]

是要在程序中吗？可以试试以下代码：
procedure TDm1.InitDataBase(aliasnames :string;localpath:string);
var
AliasParams:TStringList;
FilePath : string;
begin
FilePath := 'path=' + DefaultDir + localpath +'\';
Aliasparams:=TStringList.Create;
AliasParams.Add(Filepath);

if not Session.IsAlias(aliasnames) then
begin
try
Session.AddAlias(aliasnames,'STANDARD',ALiasParams);
Session.SaveConfigFile;
finally
AliasParams.Free;
end;
end else
begin
try
Session.ModifyAlias(aliasnames,AliasParams);
Session.SaveConfigFile;
finally
AliasParams.Free;
end;
end;
end;

[qsyang]

to 阿凯
你以前的回答在哪里啊？