Вниз
Скачать: CL | DM;

Как снять флажок из Delphi у компонента HTML "checkbox"?   Найти похожие ветки 

← →
Vopros123123   (2008-01-05 02:22) [0]

По щелчку кнопки на форме нужно произвести снятие флажка в HTML документе, который загружен в TWebBrowser. Только как?..

HTML код:
<input type="checkbox" name="allow_rating" value="1" checked>

Иными словами, нужно как-то сбросить параметр checked. Но как?..

Заранее спасибо!


← →
homm ©   (2008-01-05 15:21) [1]

procedure TForm1.Button6Click(Sender: TObject);
var
  DOM: Variant;
begin
  DOM := WB.OleObject.Document;
  DOM.getElementById("my-checkbox").checked = "true";
end;


← →
Vopros123123   (2008-01-05 15:57) [2]


> homm ©   (05.01.08 15:21) [1]
> procedure TForm1.Button6Click(Sender: TObject);
>var   DOM: Variant;
>begin   DOM := WB.OleObject.Document;
>  DOM.getElementById("my-checkbox").checked = "true";
>end;

Мне нужно не поставить, а снять флажок. Установка в False не помагает


← →
homm ©   (2008-01-05 16:25) [3]

> [2] Vopros123123   (05.01.08 15:57)
> Установка в False не помагает

установка в "" помогает?


← →
Vopros123123   (2008-01-05 17:32) [4]


> homm ©   (05.01.08 16:25) [3]
> > [2] Vopros123123   (05.01.08 15:57)> Установка в False
> не помагаетустановка в "" помогает?

Нет, не помагает

Решил трабл следующим образом:

var
 ovElements: OleVariant;
 i:Integer;
begin
 ovElements := NLWB.OleObject.Document.forms.item(2).elements;
 for i := 0 to (ovElements.Length - 1) do
  if (ovElements.item(i).tagName = "INPUT") and
     (ovElements.item(i).type = "checkbox") and
     (ovElements.item(i).Name = "my_checkbox_name") then
    ovElements.item(i).Click;
end;


← →
homm ©   (2008-01-05 17:44) [5]

> [4] Vopros123123   (05.01.08 17:32)

Зачем эта вся партянка, не проще id проставить?


← →
Vopros123123   (2008-01-05 18:24) [6]


> homm ©   (05.01.08 17:44) [5]
> > [4] Vopros123123   (05.01.08 17:32)Зачем эта вся партянка,
>  не проще id проставить?

Можно и по id :-) Но на серваке, к которому код пишу, id не указывается



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
4-1197378338
Игорь00
2007-12-11 16:05
2008.10.05
Static без мерцания


15-1218172225
Vlad Oshin
2008-08-08 09:10
2008.10.05
Голосовали? За кого? :)


2-1219757900
Евгений Р.
2008-08-26 17:38
2008.10.05
Координаты компонента


2-1219999591
aidyn
2008-08-29 12:46
2008.10.05
работа с 20-значными числами


2-1219902669
vvrz
2008-08-28 09:51
2008.10.05
несколько колонок в QReport




   Наверх