Kullanmış olduğunuz Aliasın (Takma ismin) Driver ismi, Alias adı, fiziksel yol gibi bazı özelliklerini öğrenebileceğiniz bir fonksiyon.
Afiyet olsun.
-------------------------------------------------------
Kod: Tümünü seç
...
uses
DBIProcs, DBITypes
...
function TAnaform.AliasOzellikler(Alias: String): StringList;
var
StringList: TStringList;
DbDes: DBDesc;
begin
try
StringList:=TStringList.Create;
try
Check(DbiGetDatabaseDesc(PChar(Alias), @DbDes));
with DbDes do
begin
StringList.Add('Driver İsmi: '+szDbType);
StringList.Add('Alias Adı: '+szName);
StringList.Add('Text: '+szText);
StringList.Add('Fiziksel yol: '+szPhyName);
end;
finally
Result := StringList;
StringList.Free;
end;
except
ShowMessage('Tanımlanan Alias a ulaşılamadı');
end;
end;