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

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

TWebBrowser


Micke ©   (2003-03-30 22:01:00) 

Народ! Вопрос: как мне изменить value input"а в TWebBrowser? И как сделать чтобы там формы Enter"ом отправлялись?


Ihor Osov'yak   (2003-04-07 22:13:00) [1]

2 nikkie © (07.04.03 18:35)

Да нет, Вы не совсем правы. Я тут почти полчаса пытался развить этот тезис, но во время постинга случился сбой и текст унесло.. Перебивать влом. Если коротко - VarArrayCreate здесь ни причем.
Кода будет больше незначительно, но зато он будет намного надежнее и легче в отладке. Вывод проверялся практически, в том числе и путем переписывания проектов от других кодеров, которые увлекались "бейсиковским" стилем...


nikkie   (2003-04-07 18:35:00) [2]

>Ihor Osov"yak
Мощь дельфи - в том, что можно делать и по-бейсиковски и по-сишному. Если кого прикалывает писать кучу кода с использованием VarArrayCreate - пусть пишет, хотя я не вижу преимущества раннего связывания перед поздним в данном случае. Если ты хочешь более аккуратного кода, напиши

var
Doc, Tag: Variant;
begin
Doc := WebBrowser.Document;
if not VarIsClear(Doc) then begin
Tag := Doc.All.Tags("input");
if not VarIsClear(Tag) then begin
// и т.д.
end;
end;
end;


Micke   (2003-04-06 22:56:00) [3]

Пасиб народ! Сегодня испытаю...


Ihor Osov'yak   (2003-04-06 21:44:00) [4]

Почему по-бейсиковски? Связывание во время рантайма по именам. То есть часть ошибок, которые мог-бы поймать компилятор, пропускаем на рантайм. Плюс постоянное нарывание на ексепшены в случае обращения к обьектам, которых не существует (которые конечно можно перехватить, как Вы это и делаете, но все же..).
Конечно, есть случаи, когда более оптимально работать по познему связыванию, а иногда другого и не дано.. Но это не тот случай.

По поводу инфо - посмотрите ссылочку, которую я привел.. Писалось это два года назад.. Сейчас бы несколько по другому расставил бы акценты.. Но там я делал упор все же на "не бейсиковский" стиль.

Вообще- то я собирался писать продолжение, материала слава богу более чем достаточно. Думаю что все - же продолжу, даже в обозримом будущем.

Если же с инглиш не проблема - то msdn, "Reusing Browser Technology" - информации очень много, в деталях...



sergey2   (2003-04-06 20:41:00) [5]

2 Ihor Osov"yak Просто так проще. Да и инфу об этом в инете трудно найти. Что-то одно нашел и теперь все что имеет отношение к TWebbrowser"у пишу подобным образом. Согласен что может это и не совсем правильно.
да и я обычно делаю так: (вернее принцип такой)

error:=false;
try
Webbrowser1.oleobject.document.All.tags("input").item(n,varEmpty).value:="Вася Пупкин";
except
error:=true;
end;

А потом анализирую переменную error

кстати плиз если считаешь что это тоже по-Бейсиковски, то обьясни почему.



Ihor Osov'yak   (2003-04-06 17:04:00) [6]

2 Micke © (05.04.03 20:48)

http://delphi.vitpc.com/mastering/tweb.htm

2 sergey2 (06.04.03 06:42)

Не надо так делать. На бейсике пускай так делают.
Дело в том, что соотв. элемент может отсутствовать (хотя бы по причине ошибки загрузки страницы) - ексепшенов получишь кучу..




sergey2   (2003-04-06 06:42:00) [7]

Я так понимаю что тебе вот это нужно:

Webbrowser1.oleobject.document.All.tags("input").item(n,varEmpty).value:="Вася Пупкин";


n - номер input"а. Начинается с 0.


Micke   (2003-04-05 20:48:00) [8]

Ребята спасайте!!! Что делать! Нигде нет ответа на это! Вы последняя надежда!


Ш-К   (2003-04-02 23:09:00) [9]


> как сделать чтобы там формы Enter"ом

IE проапгрейдить.


sergey2   (2003-04-02 12:23:00) [10]

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


Micke   (2003-03-31 19:48:00) [11]

Простите... но я что-то не могу найти... есть похожее, но совсем не то! Ну подскажите млин! Я так долго уже парюсь! Из-за этого не продвигается написание программы... всё.. безнадёга...


gek   (2003-03-31 02:58:00) [12]

См в FAQ, этот вопрос часто задается


Наверх

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