![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Прога
Scripl © (2005-12-17 21:08:00)Такая тема...Нужно сделать прогу,в которой при нажатии на кнопочку в Labelе появляеться текст с картинками и при этом на форме открывалась HTML страничка...
mfender (2005-12-18 17:45:00) [1]
> всё ок..всё работает...
> Только ещё один вопросик...Как сделать чтобы открывался
> определённый файл?а то открываеться диалоговое окно...
А не заметно?
WebBrowser1.Navigate('http:\\www.site\page.htm'); ^))
Scripl (2005-12-18 17:39:00) [2]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;
всё ок..всё работает...
Только ещё один вопросик...Как сделать чтобы открывался определённый файл?а то открываеться диалоговое окно...
alex-drob (2005-12-18 01:07:00) [3]
> Помогая халявщикам, вы лишаете армию "пушечного мяса".
По мимо того чтобы программу написать, в большенстве случаев нужно объяснить преподавателю как она работает. Я думаю что это сложно не выучив. Даже если заучить наизусть что делает каждая строчка программы.
kami (2005-12-18 00:53:00) [4]Плохиш © (18.12.05 0:40) [23]
Не надо так о армии, мне например в подразделении нужно не пушечное мясо, а люди с мозгами.
Так что вместо армии пусть идет дворником, на нормальную работу его не возьмут.
Плохиш (2005-12-18 00:40:00) [5]Помогая халявщикам, вы лишаете армию "пушечного мяса".
kami (2005-12-17 23:43:00) [6]Так, глядишь, дистанционно, общими усилиями форума и наклепаем очередную супер-пупер надстройку над IE ^)
Scripl (2005-12-17 23:33:00) [7]Спасиба!!!
kami (2005-12-17 23:33:00) [8]А, ну и конечно, потом - Form2.Show
kami (2005-12-17 23:32:00) [9]Что мешает сделать File>New>New Form и положить туда WebBrowser, заменив всего лишь одну строчку на
Form2.WebBrowser1.Navigate... ?
Zeqfreed (2005-12-17 23:32:00) [10]Scripl (17.12.05 23:25) [17]
Нужно создать дополнительный экземпляр формы во время выполнения программы и вызвать метод Navigate того WebBrowser'а, который будет находиться на только что созданной форме.
Scripl (2005-12-17 23:25:00) [11]Я хочу чтобы кнопка была на одной форме и когда на неё нажимаешь TWebBrowser открывал файл в новом окне
Zeqfreed (2005-12-17 23:20:00) [12]Scripl (17.12.05 23:17) [15]
Какой браузер?
Scripl (2005-12-17 23:17:00) [13]Ещё один вопрос...как сделать чтобы браузер открывал файл в новом окне?
Scripl (2005-12-17 22:57:00) [14]Вот и всё...Большое СПАСИБО!!!!!!!!!
Zeqfreed (2005-12-17 22:35:00) [15]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:26:00) [16]У меня конкретный вопрос.
Как открыть файл в TWebBrowser?
Zeqfreed (2005-12-17 22:18:00) [17]Scripl (17.12.05 22:03) [8]
Предлагаю Вам воспользоваться книжками/поисковиками и справкой. На форуме Вам могут помочь с конкретными вопросами.
kami (2005-12-17 22:12:00) [18]Scripl (17.12.05 22:07) [9]
Вам помогут:
событие кнопкиOnClick
свойство LabelCaption
метод браузераNavigate
Именно в такой последовательности. Ну и не забывать про справку
Scripl (2005-12-17 22:07:00) [19]на форме есть кнопка,label и TWebBrowser ...Я хочу чтобы при нажатии на кнопку в Label появлялся текст а в TWebBrowser открывался определённый HTML файл.
Scripl (2005-12-17 22:03:00) [20]Я не понял всё,что сказал выше...