Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Вниз

Несколько вопросов по TWebBrowser. 


knyaz17   (2002-02-11 12:41) [0]

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



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

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

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

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



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

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



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

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



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

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



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

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



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

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



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

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

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

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

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



knyaz17   (2002-02-12 12:04) [8]

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



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

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

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



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

Не работает!!!!
На строке
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;



knyaz17   (2002-02-13 13:25) [11]

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

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




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.022 c
14-81084          snoup                 2002-03-18 22:09  2002.04.25  
Как написать простую звонилку которая бы просто звонила по номеру и проводила нужную аутенфикацию и соединялась с инетом ?


7-81101           Leviathan             2001-12-06 21:13  2002.04.25  
Stay On Top


1-80856           besen-ok              2002-04-11 10:48  2002.04.25  
Компенетра на Delphi (DLL) для 1С


1-80956           kopachev              2002-04-11 14:46  2002.04.25  
Почему не появляется текст в ячейке AdvStringGrid.


3-80749           Fareader              2002-03-25 15:46  2002.04.25  
Глюк DBGridEh