Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > Заполнение элементов RadioButton в TWebBrowser

Автор: Stigmat 18.1.2007, 02:09

Я загружаю html - страничку в TWebBrowser,
Мне нужно заполнить(изменить значения) определенных элементов.
Следующим кодом

Код


var
  ovElements: OleVariant;
   Document: Variant;
  i,j: Integer;
begin
 Document := WebBrowser1.Document;
 for j:=0 to (Document.forms.Length - 1) do
 begin
   ovElements := WebBrowser1.OleObject.Document.forms.item(j).elements;
   for i := 0 to (ovElements.Length - 1) do
     begin
      if (ovElements.item(i).name = Edit1.Text) then  begin ovElements.item(i).value := Edit2.Text; end;
     end;
  end;
end;

можно изменить значение переменной в зависимости от ее имени.
Так получается управлять многими элементами за исключением элементов RadioButton, CheckButton. Может кто подскажет как можно ими "управлять" ?

Автор: _hunter 18.1.2007, 11:46

"управлять" -- точно так же... если ты имел в виду установку свойства Checked -- приводи елемент к IHTMLButtonElement и меняй ему status (можно и value в 1 поставить попробовать...)

Автор: TrillerMan 21.1.2007, 11:49

Посмотри как в тегах это меняеться и так же делай,о результатах отпиши