whitekid wrote:

> 제목 그대로 BDE의 버전을 체크하려고 합니다.

>

> 단 BDE API는 안쓰고.. 즉 BDE가 로드되어있지 않는 상태에서

> 버전을 체크하려고 합니다.

>

> 제 시스템에는 BDE 5 가 설치되어있는데... 레지스트리

> HKEY_LOCAL_MACHINESoftwareBorlandDatabase EngineSettingsSYSTEMINITVersion

> 에 보면 4.0으로 나오고 이거 확실히 체크할 수 있는 방법 있습니까?

>





whitekid님 안녕하세요?

아래는 BDE버젼 정보 알아내는 코드입니다.

보시고 도움되시길 바랍니다.

그럼..

uses BDE;



procedure AddBDEAlias(

sAliasName,

sAliasPath,

sDBDriver : string );

var

h : hDBISes;

begin;

DBIInit( nil );

DBIStartSession( 'dummy', h, '' );

DBIAddAlias( nil,

PChar( sAliasName ),

PChar( sDBDriver ),

PChar( 'PATH:' + sAliasPath ),

True );



DBICloseSession( h );

DBIExit;

end;



//사용 예)

//AddBDEAlias('TestDB','C:Temp', 'DBASE' );