Прога

← →
Scripl (2005-12-17 21:08) [0]

Такая тема...Нужно сделать прогу,в которой при нажатии на кнопочку в Labelе появляеться текст с картинками и при этом на форме открывалась HTML страничка...

← →
Zeqfreed © (2005-12-17 21:11) [1]

Scripl (17.12.05 21:08)
Да, отличная тема. А какие вопросы, касающиеся данной темы, Вас более всего мучат?

← →
Scripl (2005-12-17 21:13) [2]

Как сделать такую кнопочку???

← →
Scripl (2005-12-17 21:19) [3]

Ну так вот...как сделать такую кнопочку?и что за компонент нужен для отображения HTML страничек на форме?

← →
Zeqfreed © (2005-12-17 21:28) [4]

Scripl (17.12.05 21:19) [3]

> как сделать такую кнопочку?

Как и любую другую - перенести её из палитры компонент на форму.

> что за компонент нужен для отображения HTML страничек
> на форме?

Например, можно использовать TWebBrowser.

← →
Scripl (2005-12-17 21:30) [5]

А можно рассказать об этом поподробнее?
Что сделать чтобы при нажатии на кнопочку в TWebBrowser открылась страничка и одновременно в Labele появилась надпись???
подскажите плиз..

← →
Плохиш © (2005-12-17 21:45) [6]

> Scripl (17.12.05 21:30) [5]
> А можно рассказать об этом поподробнее?

А что в справке и книжках не достаточно подробно написано?

← →
Zeqfreed © (2005-12-17 21:47) [7]

Scripl (17.12.05 21:30) [5]
А что Вы уже сделали? В чем возникли трудности? Что конкретно не понятно?

← →
Scripl (2005-12-17 22:03) [8]

Я не понял всё,что сказал выше...

← →
Scripl (2005-12-17 22:07) [9]

на форме есть кнопка,label и TWebBrowser ...Я хочу чтобы при нажатии на кнопку в Label появлялся текст а в TWebBrowser открывался определённый HTML файл.

← →
kami © (2005-12-17 22:12) [10]

Scripl (17.12.05 22:07) [9]
Вам помогут:
событие кнопки OnClick
свойство Label Caption
метод браузера Navigate
Именно в такой последовательности. Ну и не забывать про справку

← →
Zeqfreed © (2005-12-17 22:18) [11]

Scripl (17.12.05 22:03) [8]
Предлагаю Вам воспользоваться книжками/поисковиками и справкой. На форуме Вам могут помочь с конкретными вопросами.

← →
Scripl (2005-12-17 22:26) [12]

У меня конкретный вопрос.
Как открыть файл в TWebBrowser?

← →
Zeqfreed © (2005-12-17 22:35) [13]

Scripl (17.12.05 22:26) [12]
Используя метод Navigate экземпляра класса TWebBrowser, в простейшем случае. Для загрузки локального файла легче всего использовать псевдо-протокол file:\\. Пример использования:

procedure TForm1.Button1Click(Sender: TObject); var OD : TOpenDialog; begin OD := TOpenDialog.Create(self); try OD.Filter := "HTML Files|*.html;*.htm"; OD.Options := OD.Options + [ofFileMustExist]; if OD.Execute then WebBrowser1.Navigate("file:\\" + OD.FileName); finally OD.Free; end; end;

← →
Scripl (2005-12-17 22:57) [14]

Вот и всё...Большое СПАСИБО!!!!!!!!!

← →
Scripl (2005-12-17 23:17) [15]

Ещё один вопрос...как сделать чтобы браузер открывал файл в новом окне?

← →
Zeqfreed © (2005-12-17 23:20) [16]

Scripl (17.12.05 23:17) [15]
Какой браузер?

← →
Scripl (2005-12-17 23:25) [17]

Я хочу чтобы кнопка была на одной форме и когда на неё нажимаешь TWebBrowser открывал файл в новом окне

← →
Zeqfreed © (2005-12-17 23:32) [18]

Scripl (17.12.05 23:25) [17]
Нужно создать дополнительный экземпляр формы во время выполнения программы и вызвать метод Navigate того WebBrowser"а, который будет находиться на только что созданной форме.

← →
kami © (2005-12-17 23:32) [19]

Что мешает сделать File>New>New Form и положить туда WebBrowser, заменив всего лишь одну строчку на
Form2.WebBrowser1.Navigate... ?

А, ну и конечно, потом - Form2.Show

← →
Scripl (2005-12-17 23:33) [21]

Спасиба!!!

Так, глядишь, дистанционно, общими усилиями форума и наклепаем очередную супер-пупер надстройку над IE ^)

Помогая халявщикам, вы лишаете армию "пушечного мяса".

Плохиш © (18.12.05 0:40) [23]
Не надо так о армии, мне например в подразделении нужно не пушечное мясо, а люди с мозгами.
Так что вместо армии пусть идет дворником, на нормальную работу его не возьмут.

> Помогая халявщикам, вы лишаете армию "пушечного мяса".

По мимо того чтобы программу написать, в большенстве случаев нужно объяснить преподавателю как она работает. Я думаю что это сложно не выучив. Даже если заучить наизусть что делает каждая строчка программы.

← →
Scripl (2005-12-18 17:39) [26]

procedure TForm1.Button1Click(Sender: TObject);var OD : TOpenDialog;begin OD := TOpenDialog.Create(self); try OD.Filter := "HTML Files|*.html;*.htm"; OD.Options := OD.Options + [ofFileMustExist];
if OD.Execute then WebBrowser1.Navigate("file:\\" + OD.FileName); finally OD.Free; end;end;
всё ок..всё работает...
Только ещё один вопросик...Как сделать чтобы открывался определённый файл?а то открываеться диалоговое окно...

> всё ок..всё работает...
> Только ещё один вопросик...Как сделать чтобы открывался
> определённый файл?а то открываеться диалоговое окно...

А не заметно?
WebBrowser1.Navigate("http:\\www.site\page.htm"); ^))

Прога Найти похожие ветки