이런..

어린왕자님 답변하고 보니까 델파이 함수로 존재하네요..



혹시 확인한번 해보세요..



SelectDirectory 함수요.. 예제도 있던데요.



어린왕자 wrote:

> 안녕하셔요..영원한 델초보 어린왕자입니다.

> 근데..디렉토리 선택하는 창을 만들고 싶은데요...어떻게 API를 쓰면 뜬가요?

안녕하세요..

델파이세상(http://www.freechal.com/delphiworld)에 최석기입니다.



다음과 같이 해보세요..



uses ShlObj;



procedure TForm1.Button1Click(Sender: TObject);

var

Info: TBrowseInfo;

IDList: pItemIDList;

Buffer: PChar;

begin

Buffer := StrAlloc(MAXWORD);

with Info do begin

hwndOwner := Handle;

pidlRoot := nil;

pszDisplayName := Buffer;

lpszTitle := '폴더를 선택해 주세요:';

ulFlags := BIF_RETURNONLYFSDIRS {or BIF_BROWSEINCLUDEFILES};

//BIF_BROWSEINCLUDEFILES는 하위 파일까지 보여줌.

lpfn := nil;

lParam := 0;

IDList := SHBrowseForFolder(Info);

end;

if IDList <> nil then begin

SHGetPathFromIDList(IDList, Buffer);

ShowMessage(Buffer); //선택한 폴더를 화면에 보여준다.

end;

StrDispose(Buffer);

end;



어린왕자 wrote:

> 안녕하셔요..영원한 델초보 어린왕자입니다.

> 근데..디렉토리 선택하는 창을 만들고 싶은데요...어떻게 API를 쓰면 뜬가요?

내용없다니께로...

DirectoryListbox를 사용하세요



win3.1 텝에 있는

DirectoryListbox 와 FileListbox 그리고 drivecombobox를 사용하시면되고

sample 텝에 Direcortyoutline을 사용해도 됩니다.





어린왕자 wrote:

> 안녕하셔요..영원한 델초보 어린왕자입니다.

> 근데..디렉토리 선택하는 창을 만들고 싶은데요...어떻게 API를 쓰면 뜬가요?

김성중 wrote:

> DirectoryListbox를 사용하세요

>

> win3.1 텝에 있는

> DirectoryListbox 와 FileListbox 그리고 drivecombobox를 사용하시면되고

> sample 텝에 Direcortyoutline을 사용해도 됩니다.

>

>

> 어린왕자 wrote:

> > 안녕하셔요..영원한 델초보 어린왕자입니다.

> > 근데..디렉토리 선택하는 창을 만들고 싶은데요...어떻게 API를 쓰면 뜬가요?



디렉토리선택창...

그니깐..찾아보기를 누르면..디렉토리를 선택창만 나오게 할려구요..

다시 폼을 생성해서 만들면 쫌 글잖아요...

어린왕자 wrote:

> 김성중 wrote:

> > DirectoryListbox를 사용하세요

> >

> > win3.1 텝에 있는

> > DirectoryListbox 와 FileListbox 그리고 drivecombobox를 사용하시면되고

> > sample 텝에 Direcortyoutline을 사용해도 됩니다.

> >

> >

> > 어린왕자 wrote:

> > > 안녕하셔요..영원한 델초보 어린왕자입니다.

> > > 근데..디렉토리 선택하는 창을 만들고 싶은데요...어떻게 API를 쓰면 뜬가요?

>

> 디렉토리선택창...

> 그니깐..찾아보기를 누르면..디렉토리를 선택창만 나오게 할려구요..

> 다시 폼을 생성해서 만들면 쫌 글잖아요...





Rx 컴포넌트가 있는데요..



거기에 있는 컴포넌트를 사용하시면 될 듯 하네요..^^"



저는 그것으로 사용하다가 다시 기본 컴포넌트를 사용하기로 했거든요..



음..제 생각엔..(저도 아직 테스트 해 보진 않았지만..^^;; 구상만 했어요..)



일단, Edit 컴포(넌트)를 하나 올려놓고, 옆의 버튼을 누를때의 이벤트를 코딩해 주심

어떨지..



1. TDirectoryListBox 컴포를 동적으로 생성한 다음,

2. 폴더를 선택했을 때의 이벤트를 적어서

3. Edit 컴포에 뿌려주는 거요..



생각만 한 겁니다..^^;; 왜..생각은 아무나 하잖아요..



지금 시간이 없어서리...하고 있는 일을 하루 빨리 끝내야 하는관계로



휘리릭~~



아뭏튼!