Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[13124] 팁&트릭의 [동적으로 BDE Alias 생성하기] 예제가 안되는 이유가 먼가요?
newhuni [] 1414 읽음    2010-02-09 21:26
안녕하세요.
팁&트릭에 [동적으로 BDE Alias 생성하기]예제가 있습니다.

이 예제를 그대로 C++빌더에서 실행하면 정상적으로 생성됩니다.
그런데... 델파이에서는 생성되지 않습니다.

도무지 이유를 못 찾겠습니다.
그 이유가 먼가요??

--- 예제 ---
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;  
 
procedure TForm2.Button1Click(Sender: TObject);  
begin 
  AddBDEAlias('TestDB','C:\Temp', 'DBASE' );  
end;

+ -

관련 글 리스트
13124 팁&트릭의 [동적으로 BDE Alias 생성하기] 예제가 안되는 이유가 먼가요? newhuni 1414 2010/02/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.