ADO의 데이터 연결문자열을 생성하는 대화상자 띄우기 - PromptDataSource

델파이에서 ADO 연결문자열을 설정할 때, 나타나는 "데이터 연결 속성" 창을 그대로 호출해주는 함수가 있습니다. 제목에도 있는 PromptDataSource 함수입니다. 이 함수를 호출하면 아래 그림과 같은 "데이터 연결 속성" 창이 나타납니다.

아래는 PromptDataSource 함수를 사용한 예입니다.

procedure TMainForm.btnConnectionStringClick(Sender: TObject);
var
  wstrConnStr:string;
begin
  wstrConnStr := FConnectionString;
  wstrConnStr := PromptDataSource(handle, wstrConnStr);
  if wstrConnStr<>'' then
  begin
    FConnectionString:=wstrConnStr;
    lblConnectionString.Caption:='설정됨';
  end
  else
    lblConnectionString.Caption:='미설정';
end;