function GetIExplorerURL: String;
var
szClassName: array [0..50] of Char;
i,cnt: Integer;
handle: HWnd;
hr: HResult;
pSW: IShellWindows;
spDisp: IDispatch;
pWB: IWebBrowser2Disp;
pBrowser: InternetExplorer;
begin
handle:=FindWindow(PChar('IEFrame'),nil);
if handle>0 then
begin
handle:=GetWindow(handle,GW_HWNDFIRST);
while handle>0 do
begin
박준형님의 강좌중에서 현제 제일위에 떠있는 익스플로러창의 url을 알아내는 법인데
이상하게 익스플로러창이 두개이상떠있으면 항상 제일먼저 뛰운 창의 url만 가져옵니다.
창이 하나일때는 그창의 url을 제대로 가져오구요...
어디에서건 F2키를 누르면 익스