안녕하세요.. (_ _ 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)
함 해보세요~
---------------------------------------------------------------------
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;
--------------------------------------------------------------------