![]() | | | ![img]() |
|
 | DRKB online - Добавление псевдонима с помощью функции DbiAddAlias |
|
|
| |
|
Добавление псевдонима с помощью функции DbiAddAlias
Автор: Tom Stickle
| delphi | var
pszAliasName: PChar; { Имя псевдонима }
pszDriverType: PChar; { Тип драйвера для псевдонима }
pszParams: PChar; { Дополнительные параметры }
bPersist: Bool; { Постоянный или временный псевдоним }
dbiRes: Integer; { Возвращаемый код }
begin
pszAliasName := strAlloc(25);
pszDriverType := strAlloc(25);
pszParams := strAlloc(100);
try
bPersist := True;
strPcopy(pszAliasName, 'Lance');
strPcopy(pszDriverType, 'PARADOX');
strPcopy(pszParams, 'PATH:' + 'c:\Paradox\');
dbiRes := DbiAddAlias(nil, pszAliasName, pszDriverType, pszParams,
bPersist);
finally
strDispose(pszAliasName);
strDispose(pszDriverType);
strDispose(pszParams);
end;
end; |
@Drkb::02524
Взято с http://delphiworld.narod.ru |
|
| | Количество статей: 4366 |
|
|
| |
|
| Статистика |
| | Сегодня | Всего |
| Посетителей | 4316 | 4254213 |
| Запросов | 182630 | 397032939 |
| Online |
| Пользователей | 0 |
| Гостей | 482 |
|
|
|
Пуск
