Добавил:
bagiwow
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Паскаль / do9 / iriepas201 / Irie Pascal / samples / explorer
.pas //************************************************************************
//This program demonstrates how to create instance if internet explorer
// and navigate to a website (in this case the IrieTools website).
//************************************************************************
program Explorer;
var
objExplorer : object;
app : object;
begin
objExplorer := CreateObject('InternetExplorer.Application');
app := objExplorer.application;
app.navigate('http://www.irietools.com', 1, , ,);
app.quit;
dispose(app);
dispose(objExplorer);
end.
//This program demonstrates how to create instance if internet explorer
// and navigate to a website (in this case the IrieTools website).
//************************************************************************
program Explorer;
var
objExplorer : object;
app : object;
begin
objExplorer := CreateObject('InternetExplorer.Application');
app := objExplorer.application;
app.navigate('http://www.irietools.com', 1, , ,);
app.quit;
dispose(app);
dispose(objExplorer);
end.
Соседние файлы в папке samples