Имитация псевдонима PdoxWIN PRIV

Советы » Alias » Имитация псевдонима PdoxWIN PRIV

var

d : TDataBase; begin

d := TDataBase.Create(Application); d.DataBaseName := 'PRIV'; d.DriverName := 'STANDARD'; d.Params.Add('PATH='+Session.PrivateDir); d.Connected := True

; end

;

...теперь вы имеете псевдоним с именем 'PRIV', указывающий на частный каталог.

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com