Текущий архив: 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.44 MB
Время: 0.004 c