Q&A

  • Shell.Explorer 를 아시나요? InternetExplorer.Application 이랑 비슷한뎅..
안녕하세요.. (_ _ a)

variant를 이용해서 새로운 IE를 실행시킬때 이렇게 하죠..

var
E: Variant;
begin
E := CreateOleObject('InternetExplorer.Application);
E.Visible := True;
E.Navigate('http://www.delphi.co.kr');
end;

근뎅... 로컬 경로도 된답니다.. 일케요

E.Navigate('file://C:/WinNT/System32');

욜케요.. 그럼 탐색기 마냥 욜케 나오죠.. 욜케하면 탬색은 되는데, 캡션에
' ... - Internet Explorer' 란놈이 붙어 있어서 ㅡ.,ㅡa

제가 궁금한것은 탐색기를 이런식으로 띄울 수는 없느냐는것이죠..
Ineternet Explorer의 ProgID는 'InternetExplorer.Application' 입니다..
제가 registry를 뻘짓하믄서 찾았는뎅.. 탐색기는 'Shell.Explorer' 같더군요.
그래서 위에처럼 해봐떠니.. 않되더군요 ㅠ_ㅠ..

탐색기를 제 프로그램에서 이런식으로 실행시켜저 조정(폴더 변경..)을 하고
싶거든요.. 주 목적은 폴더 변경과 현재 선택된 폴더 경로를 구하는것입니다.

이런저런 뻘짓을 해봤는데.. 별 소득이 없어서.. 여러 고수 형님들의 아낌없는 테클을 구하는 바입니다. ㅜ_ㅜ..

Shell Programming의 고수님들 테클걸어주세요 (_ _ a)
2  COMMENTS
  • Profile
    사오정 2003.03.26 05:40
    저희 소스  보니깐 나온게 있어서.....대충 응용했는데....맞나 모르겠네요~
    함 해보세요~
    ---------------------------------------------------------------------
    procedure TForm1.Button3Click(Sender: TObject);
    var
      s_ExeWithParams : array[0..50] of char;
    begin
      StrPCopy(s_ExeWithParams,'C:/WinNT/Explorer.exe '+'C:WinNTSystem32' );
      WinExec(s_ExeWithParams, SW_MAXIMIZE)

    end;
    --------------------------------------------------------------------

  • Profile
    KDDG_BaSTaD 2003.03.26 22:16
    ==> 답변 감사드립니다.. 하지만.. 제가 질문한 내용과는 차이가 있네요 ^^;;