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

C++빌더 팁&트릭
C++Builder Programming Tip&Tricks
[699] [Dialog] TOpenDialog 에서 Folder를 옮겨도 ViewStyle 고정시키기 - 펌
장성호 [nasilso] 7312 읽음    2007-08-08 18:17
[출처]http://www.swissdelphicenter.ch/torry/showcode.php?id=1864

탐색기의 설정에 따라 어떤 폴더는 자세히 , 어떤 폴더는 아이콘 .... 으로
View-Style이 제가각 설정되어있는 경우가 있습니다.

OpenDialog에서 직접 클릭하여 ViewStyle을 변경하는것이 아니라
폴더를 옮겨도 항상 같은 Style로 보이도록 하는 팁입니다.

Delphi를 C++Builder로 변환하면서 쬐~끔 수정했습니다.

//---------------------------------------------------------------------------
void __fastcall TForm1::OpenDialog1FolderChange(TObject *Sender)
{
    const static WORD CommandIDs[5]= {0x702D,0x702E, 0x7029, 0x702B, 0x702C };
    HWND NotifyWnd = FindWindowEx(GetParent(OpenDialog1->Handle), 0, "SHELLDLL_DefView", NULL);
    if( NotifyWnd)SendMessage(NotifyWnd, WM_COMMAND, CommandIDs[OpenDialog1->Tag ], 0);
}    
//---------------------------------------------------------------------------

//미리보기,큰아이콘,아이콘,간단히,자세히 
enum  TFileViewStyle {fvsThumbnails,fvsBigIcons,fvsSmallIcons,fvsTiles, fvsDetails};

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    OpenDialog1->Tag = 4; //OpenDialog1->Tag = fvsDetails;  
    OpenDialog1->Execute();
}
//---------------------------------------------------------------------------


그럼...
김태선 [cppbuilder]   2007-08-08 19:28 X
유용한 팁이군요 ^^;

+ -

관련 글 리스트
699 [Dialog] TOpenDialog 에서 Folder를 옮겨도 ViewStyle 고정시키기 - 펌 장성호 7312 2007/08/08
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.