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
[9011] Re:[질문] DB 컴포넌트들에서 Connection String Dialog box
civilian [civilian] 863 읽음    2003-11-04 12:58
델파이7을 기준입니다.

우선 uses절에 ADODB를 추가합니다.
ADODB.pas 파일을 살펴보면

function PromptDataSource(ParentHandle: THandle; InitialString: WideString): WideString;
란 함수가 보입니다.

이넘이 다이얼로그를 불러주는 놈이지요. 따라서 버튼 클릭 이벤트 등에서 다음과 같이
코딩해주면 됩니다.

procedure TForm1.Button1Click(Sender: TObject);
var
  Connection: String;
begin
  Connection := PromptDataSource(Handle,'');
  if Connection <> '' then
    ADOConnection1.ConnectionString := Connection;
end;

조규호 님이 쓰신 글 :
: DB 컴포넌트들에는 보통 ConnectionString이 프로퍼티로 들어가있고, ConnectionString 프로퍼티에서 [...] 버튼을 누르면 Connection String dialog box가 나타나서 Connection String을 만들 수 있는 환경을 제공합니다.
:
: 그런데...
:
: 이 다이얼로그를 런타임중에 실시간으로 띄울수 없는가 하는 것이 제 질문입니다. 델파이를 시작한지 얼마안되는 초보라, 컴포넌트 빌트인 다이얼로그를 어떻게 띄우는지 모르겠군요. ^-^ 답변 부탁드립니다.

+ -

관련 글 리스트
9007 [질문] DB 컴포넌트들에서 Connection String Dialog box 조규호 680 2003/10/29
9011     Re:[질문] DB 컴포넌트들에서 Connection String Dialog box civilian 863 2003/11/04
9012         Re:Re:[질문] DB 컴포넌트들에서 Connection String Dialog box 조규호 768 2003/11/04
9009     Re:[질문] DB 컴포넌트들에서 Connection String Dialog box 박지훈.임프 748 2003/11/03
9010         Re:Re:[질문] DB 컴포넌트들에서 Connection String Dialog box 조규호 1090 2003/11/03
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.