Простейший обозреватель на основе TWebBrowser

Автор: Артем Алмазов

На форму выкладываем TWebBrowser, 5 кнопок TButton, и одно поле TEdit. Для кнопок изменяем свойство Caption на "Назад", "Вперед", "Стоп", "Домой" и "Перейти". Размещаем поудобнее .

Далее добавляем код в обработчик OnClick для кнопки "Перейти":

procedure TForm1.Button4Click;
begin
 WebBrowser1.Navigate(Edit1.Text);
end;

В поле нужно указывать адресс, куда нужно перейти (url).

Для кнопки "Назад" обработчик OnClick:

procedure TForm1.Button1Click;
begin
 WebBrowser1.GoBack;
end; 

Для кнопки "Вперед":

procedure TForm1.Button2Click;
begin
 WebBrowser1.GoForward;
end; 

Для кнопки "Стоп":

procedure TForm1.Button3Click; 
begin 
 WebBrowser1.Stop; 
end; 

Для кнопки "Домой":

procedure TForm1.Button5Click; 
begin 
 WebBrowser1.GoHome;
end; 

Вот впринципе и всё. Наш элементарный браузер готов.

Просмотров: 6006

Обсудить на форуме

Проститутки без предоплаты Калининграда всегда рады принять вас в свои уютные апартаменты или приехать к вам. | Заказать проститутку Магнитогорска - это возможность испытать истинное наслаждение в любое время. | На нашем сайте проституток Пензы вы найдете самые изысканные анкеты девушек. | Снять проститутку Геленджика - легко! Просто выберите девушку нашего агентства, и ваш вечер станет незабываемым. | Индивидуалки Ханты-Мансийска - профессиональные дамы, готовые исполнить ваши самые смелые фантазии. | Наши девушки с сайта проституток Ялты готовы подарить тебе небесное блаженство. Ждем вас! | Найти проститутку Таганрога поможет вам наш сайт, где собраны лучшие анкеты девушек. | Анкеты проституток Нового Уренгоя помогут вам выбрать идеальную партнершу для незабываемого времяпрепровождения.

Copyright © 2008 - 2018 Программирование на Delphi для начинающих и не только.

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам.

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации.