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
[1116] [답변] ACTION/ 프로젝트 로딩시 알리아스 생성
댁스터 [ ] 1790 읽음    1998-02-05 23:45
안녕하세요... 댁스터입니다...

질문내용과 비슷한 것같아서 올립니다... 퍼은 글입니다..

그럼 참고하세요...



실행시에 Database Alias생성 


일반적으로 alias는 BDE Configuration 유틸리티인
BDECFG.EXE를 이용해서 별도로 지정하죠....

그러나, 더욱 좋은 방법이 있죠....
흐흐....

TDatabase 컴포넌트를 이용해서 어플리케이션 실행하는
도중에 Alias를 생성하여 사용할 수 있죠....

Alias는 데이타베이스 테이블의 경로와 데이타베이스
서버에 대한 연결 파라메터를 지정하게 됩니다.
( Alias가 어떤 기능을 하는지는 다 아시죠... )

Alias를 실행 중에 진행하게 되면 어떤 좋은 점이 있을까요..
그것은 어플리케이션이 실행중에 IDAPI32.CFG에 환경설정에
관한 걱정이 필요없어집니다....
미리 데이타베이스에 정보가 있어도 없어도 되니깐...

아래에 예제가 주어져 있습니다...
간단한 예제를 통해서 Run-Time Alias생성에 관해 알아보자구요...

다음은 STANDARD (.DB, .DBF) databases의 생성을 하고
Alias는 TTable Component에 의해서 사용되는 예제입니다...


  1 단계
------------
   새 프로젝트를 생성한다.

  2 단계
------------
   Form상에 다음의 컴포넌트를 위치시킨다.
      - TDatabase, TTable, TDataSource, TDBGrid, and TButton

  3 단계
------------
   TDatabase 컴포넌트를 더블클릭하여 TTable, TQuery, 그리고
   TTable에 사용될 DatabaseName 프로퍼티에 Alias명을 입력한다.
   (예:MyNewAlias)

  4 단계
------------
   Driver명으로 STANDARD를 선택한다.

  5 단계
------------
   'PATH='를 지정하기 위하여 TDatabase의 프로퍼티 Params에

   PATH= to C:\DELPHI\DEMOS\DATA
  를 추가한다.

  6 단계
------------
   TTable 컴포넌트의 DatabaseName에 TDatabase의
   DatabaseName를 할당한다.

  7 단계
------------
   TTable의 TableName프로퍼티에 테이블 'Customer'를 할당하고
   Active를 True로 한다.

  8 단계
------------
   TDataSource의 DataSet에 TTable.Name을 넣어준다.

  9 단계
------------
   TDBGrid의 Datasource에 TDataSource.Name을 넣어준다.

  10단계
------------
   TButton의 OnClick 이벤트에 코드를 추가한다.

  11단계
------------
   어플리케이션을 실행하고 버튼을 클릭한다.

------------
procedure TForm1.Button1Click(Sender: TObject);
begin
    Database1.DatabaseName:= 'MyNewAlias';
    Database1.DriverName:= 'STANDARD';

    Database1.Params.Clear;
    Database1.Params.Add('PATH=C:\DELPHI\DEMOS\DATA');
    Table1.DatabaseName:= 'MyNewAlias';
    Table1.TableName:= 'CUSTOMER';
    Table1.Active:= True;
    DataSource1.DataSet:= Table1;

    DBGrid1.DataSource:= DataSource1;
End;

-------------



?                  THEXDER


+ -

관련 글 리스트
1116 [답변] ACTION/ 프로젝트 로딩시 알리아스 생성 댁스터 1790 1998/02/05
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.