Форум: "Сети";
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];
ВнизTWebBrowser Найти похожие ветки
← →
Lider (2002-02-14 21:44) [0]Какими способами можно моей программке на delphi из WebBrowser"a (на делфовой форме) достать,например, введённое в стандартной форме html"я (поле "input", кнопки "submit" & "reset) текст из "input" при нажатии на кнопку "submit"?
← →
Лёша (2002-02-15 05:10) [1]
procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
var
Coll : IHTMLElementCollection;
Doc: IHTMLDocument2;
i: integer;
begin
Doc:= (WebBrowser1.Document as IHTMLDocument2);
if Doc<>nil then
begin
Coll:=Doc.All.Tags("INPUT") as IHTMLElementCollection;
for i:=0 to Coll.length-1 do
with (Coll.item(i,varEmpty) as IHTMLInputElement) do
if type_="text" {тип элемента INPUT} then
//if name="id" {имя элемента INPUT} then
Caption:=value;
end;
end;
← →
Lider (2002-02-16 01:40) [2]Уж чё-то сложно для меня новичка, но работает. Нельзя ли подробнее что это за типы переменных и всякие операторы из mshtml или подкинь плииизз доки.
← →
Lider (2002-02-16 17:30) [3]А как исходя из этой прожки к фреймам обращаться?. Я так понял , что она ищет inputы только на главной странице.
← →
Лёша (2002-02-17 02:13) [4]2 Lider (16.02.02 01:40)
Что это за типы переменных и всякие операторы описанно в MSDN (WebBrowser object). Хотя большенство информации было здесь на форумах.
2 Lider (16.02.02 17:30)
Возьми на сайте http://www.euromind.com/iedelphi/embeddedwb.htm компонент. Тот же TWebBrowser только дополненный. У него есть функции работы с фреймами. Каждый фрейм это отдельный TWebBrowser. Поэтому получи по очереди каждый интерфейс и для каждого документа выполни ту же процедуру поиска input-ov.
var i: integer;
TempBrowser: IWebBrowser2;
TempDoc: IHTMLDocument2;
begin
for i:=0 to EmbeddedWB1.FrameCount-1 do
begin
TempBrowser:= EmbeddedWB1.GetFrame(i);
TempDoc:= TempBrowser as IHTMLDocument2;
............
end;
end;
← →
Лёша (2002-02-17 02:30) [5]
TempDoc:= TempBrowser.Document as IHTMLDocument2;
← →
RainMan (2002-02-20 06:57) [6]Удалено модератором
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.004 c