Текст
предназначен для продвинутых пользователей, пишущих свои программы доступа к
данным, при переходе на ADT:
Adt файлы входят в
словарь Data.Add.
При открытии
справочников или баз данных необходимо указывать путь на словарь данных
(Например, F:\APPLICAT\REFLIS\Data.Add)
В словаре
зарегистрирован пользователь USER, пока без пароля
Пример открытия
справочника R13.dbf
var
Connection:TADSConnection;Table:TAdsTable;
begin
Connection:=TADSConnection.create(Application);
With Connection do
begin
ConnectPath:='F:\APPLICAT\REFLIS\Data.Add';
LoginPrompt:=false;
Username:='USER';
end;
Table:= TAdsTable.Create(Application)
With Table do
begin
TableType:=ttAdsADT;
AdsTableOptions.AdsCharType:=ANSI;
AdsTableOptions.AdsRightsCheck:=False;
AdsConnection:=Connection;
DatabaseName:=Connection.ConnectPath;
TableName:='R13';
Open;
....
Free;
end;
Connection.Free;