Как сделать калькулятор в Delphi?

Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.

Как Delphi реализует многоплатформенную разработку?

Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...

Информация о псевдонимах BDE

Советы » Alias » Информация о псевдонимах BDE

var

MyAliasPath: string

; const

AliasName = 'MyAlias'; {**** Получаем из BDE путь MyAlias} ParamsList := TStringList.Create; try

with

Session do

begin

Session.GetAliasNames(ParamsList); Session.GetAliasParams(AliasName, ParamsList); MyAliasPath := Copy(ParamsList[0], 6, 50) + ''; end

; finally

ParamsList.Free; end

;

Как через конфигурацию IDAPI получить физический каталог расположения базы данных, зная ее псевдоним?

Обратите внимание на метод GetAliasParams класса TSession.

Возвращенная строка будет содержать искомый путь.

Я пользуюсь следующей функцией:

uses

DbiProcs, DBiTypes; function

GetDataBaseDir(const

Alias: string

): string

; (* Возвращает каталог расположения базы данных по заданному псевдониму (без обратного слеша) *) var

sp: PChar; Res: pDBDesc; begin

try

New(Res); sp := StrAlloc(length(Alias) + 1); StrPCopy(sp, Alias); if

DbiGetDatabaseDesc(sp, Res) = 0 then

Result := StrPas(Res^.szPhyName) else

Result := ''; finally

StrDispose(sp); Dispose(Res); end

; end

;

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

Категории

Статьи

Советы

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