Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Несколько вопросов по TWebBrowser. [D5, Win2k]


knyaz17 ©   (2002-02-11 12:41:00) 

Господа ответьте пожалуйста на несколько вопросов по TWebBrowser:
1. Для чего нужен метод Navigate2 и как им пользоваться.
2. Как организовать диалог, который в IE вызывается по Ctrl-F.
3. Какое событие срабатывает, когда пользователь пытается перейти по ссылке?
Заранее благодарю.


knyaz17   (2002-02-13 13:25:00) [1]

Всё заработало, надо было ConnectionKind=ckRunnungOrNew

Всем БОЛЬШОЕ СПАСИБО!!!!!!!!


knyaz17   (2002-02-13 11:06:00) [2]

Не работает!!!!
На строке
WordApplication1.Selection.Paste;
выдает ошибку!!!
Полный код процедуры таков:
procedure TForm1.ToolButton5Click(Sender: TObject);
var
vers: WideString;
FileName, FileFormat: OleVariant;
begin
FileName:=OleVariant("My.Doc");
FileFormat:=OleVariant(wdFormatDocument);
//FileName:=OleVariant("My.RTF");
//FileFormat:=OleVariant(wdFormatRTF);

WordApplication1.ConnectKind:=ckNewInstance;
WordApplication1.Connect;
WordDocument1.ConnectKind:=ckNewInstance;
WordDocument1.Connect;

WebBrowser1.SelectAll;
WebBrowser1.Copy;
WebBrowser1.Refresh2;

//WordDocument1.Select;
WordApplication1.Selection.Paste;
WordDocument1.SaveAs(FileName, FileFormat); //.Save(EmptyParam,EmptyParam);
WordDocument1.Close;
WordApplication1.Disconnect;
end;


nikkie   (2002-02-12 14:41:00) [3]

запускаешь word, начинаешь записывать макрос, выполняешь интересующие тебя действия, смотришь, что записалось в макрос.

конкретно по поводу вопроса - WordApplication1.Selection.Paste;


knyaz17   (2002-02-12 12:04:00) [4]

Подскажите пожалуйста!
Как вставить в Word текст из буфера обмена c помощью компанент странички Servers?
Заранее благодарен!


nikkie   (2002-02-11 19:14:00) [5]

хорошо и просто не получится.

вариант 1. написать свой конвертер в RTF, используя объектную модель IHTMLDocument2 и спецификацию RTF (либо невидимый RichEdit, если не стоит вопрос о конвертации больших документов). наверняка основной проблемой будут таблицы - RTF не поддерживает вложенные таблицы. но и без этого работы - на несколько недель.

вариант 2. воспользоваться External Text Converter для HTML (поищи в интернете документ GC1039). конвертирует как-то, пока дело не доходит до вложенных таблиц. но даже и без них какие-то версии ворда при открытии отконвертированного документа говорят, что неплохо бы переустановить ворд :). тем более, требуется пара dll, которая вроде ставится с word6.0 и IE4, но я совсем не уверен насчет более новых версий.

вариант 3. скопировать в клипбоард, вставить в ворд. ворд очень неплохо отконвертирует сам. минусы - содержимое клипбоарда потеряно, в многозадачной системе вполне вероятно кто-то еще попытается использовать клипбоард в этот момент. наконец, требуется ворд.


knyaz17   (2002-02-11 17:59:00) [6]

А как-нибудь можно организовать сохранение файла в формате RTF и DOC или передать из WebBrowser в MS-WORD?


knyaz17   (2002-02-11 17:52:00) [7]

Спасибо ОГРОМНОЕ!!!!!
ВСЁ получилось!!!!


Лёша   (2002-02-11 17:15:00) [8]

Возьми на сайте компонент:
http://www.euromind.com/iedelphi/embeddedwb.htm
Это дополненный TWebBrowser с исходниками.
У него появляется проседура Embeddedwb1.Find;
Вообще, лучше вместо TWebBrowser всегда использовать TEmbeddedwb.


knyaz17   (2002-02-11 16:23:00) [9]

Лучше конечно пограммно выдавать диалог.


Лёша   (2002-02-11 15:59:00) [10]

Тебе что нужно: программно вызвать диалог или найти в документе слова?


knyaz17   (2002-02-11 15:37:00) [11]

Господа, пожалуйста ответьте, очень нужно!!!

Как организовать диалог, который в IE вызывается по Ctrl-F?????

на 3 вопрос я уже нашел ответ: OnBeforeNavigate2


Наверх

Титульная страница Поиск, карта сайта Написать письмо