try
IE := CreateOleObject('Internetexplorer.Application');
IE.Left := Self.Left ;
IE.top := Self.top ;
IE.Width := Self.Width ;
IE.Height := Self.Height ;
IE.Visible := true;
IE.Navigate(str);
IE.Toolbar := false; //툴바없애기
/////
IE 타이틀바 없애려는데요 아무리 찾아봐도 없어서요
한수 갈쳐주세요.
////
result := true;
finally
IE := Unassigned;
end;
var
ie: OleVariant; //IDispatch;
begin
try
IE := CreateOleObject('Internetexplorer.Application');
SetWindowLong(ie.hwnd, GWL_STYLE, GetWindowLong(ie.hwnd, GWL_STYLE) and not WS_CAPTION);
IE.Left := Self.Left;
IE.top := Self.top;
IE.Width := Self.Width;
IE.Height := Self.Height;
IE.Visible := true;
IE.Navigate('http://www.delphi.co.kr/');
IE.Toolbar := false; //툴바없애기
ie.statusbar := false;
ie.menubar := false;
finally
IE := Unassigned;
end;
end;
이렇게 하니 되네요..^^;