Текущий архив: 2002.04.18;
Скачать: CL | DM;

Вниз

Управление окном IExplorer   Найти похожие ветки 

← →
vitnt2000   (2002-02-15 06:58) [0]

Подскажите пожалуйста, как послать команду активному окну IExplorera из своей программы. Например заставить обновить окно или вернуться назад? Спасибо!

---

← →
[NIKEL] ©   (2002-02-15 18:27) [1]

через OLE... вот это должно тебе помочь

uses Comobj;
{...}
var
Form1: TForm1;
IEApp: OLEVariant;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
IEApp := CreateOLEObject("InternetExplorer.Application");
IEApp.Visible := True;
IEApp.Top := 0;
IEApp.Left := 0;
IEApp.Width := Screen.Width;
IEApp.Height := Screen.Height;
IEApp.Navigate(" http://delphi.mastak.ru");
end;

//ну это для закрытия : )
IEApp.Quit;

//самое главное
IEApp.GoForward
IEApp.GoBack
IEApp.GoHome
IEApp.Refresh
IEApp.Stop
IEApp.GoHome
IEApp.FullScreen := true;

//статус бар наш :)
IEApp.StatusText := "My Status Text";


IEApp.Path - путь до IE
IEApp.FullName - полный путь до IE
IEApp.LocationURL - получаешь активный URL :)


попробуй должно помочь...

---

Страницы: 1 вся ветка

Текущий архив: 2002.04.18;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.012 c