|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.08.2007, 04:01 | #1 |
Форумчанин
Регистрация: 15.06.2007
Сообщений: 182
|
Создание странички в WebBrowser
Подскажите пожалуйста как можно создать свою страничку в WebBrowser?
Вот в RichEdit1 можно добавлять строчки таким образом RichEdit1.Lines.Add('dfsd'); а в WebBrowser есть подобные команды? |
08.08.2007, 09:11 | #2 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
Зависимости: ActiveX, SHDocVw, MSHTML, Forms, установленный Internet Explorer
procedure TextToWebBrowser(Text: string; var WB: TWebBrowser_V1); var Document: IHTMLDocument2; V: OleVariant; begin // Документ необходимо создать только один раз за текущую сессию работы if WB.Document = nil then WB.Navigate('about:blank'); // Ожидаем создания документа и позволяем обрабатывать все сообщения while WB.Document = nil do Application.ProcessMessages; Document := WB.Document as IHtmlDocument2; // Вставляем текст (до 2Гб) {следующие строчки внесены недавно - старый вариант функции не работал под XP} V := VarArrayCreate([0, 0], varVariant); V[0] := Text; Document.Write(PSafeArray(TVarData( v).VArray)); Document.Close; end;
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
08.08.2007, 12:52 | #3 |
Форумчанин
Регистрация: 15.06.2007
Сообщений: 182
|
У меня в WebBrowser1 нет такой процедуры: TextToWebBrowser.
Если ее нужно создавать самому то что нужно дописать в type? и как делать коннект к этой функции. |
08.08.2007, 13:00 | #4 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
Код:
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
08.08.2007, 13:22 | #5 |
Форумчанин
Регистрация: 15.06.2007
Сообщений: 182
|
Спасибо большо вам.
|
08.08.2007, 16:05 | #6 |
Форумчанин
Регистрация: 15.06.2007
Сообщений: 182
|
разобрался.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Excel файл открывается не "до конца" (странички "не показываются" только серое поле) | Dorvir | Microsoft Office Excel | 2 | 28.03.2008 10:03 |
Динамичесое создание WebBrowser | LeoN | Компоненты Delphi | 8 | 01.12.2007 14:40 |
Webbrowser | Stanislav | Компоненты Delphi | 4 | 30.11.2007 06:20 |
Динамическое создание WebBrowser | DragonLand | Работа с сетью в Delphi | 2 | 20.08.2007 21:47 |
Текст html-странички в поле Memo | Delpinist | Win Api | 5 | 18.12.2006 14:57 |