procedure TForm1. BitBtn1Click (Sender: TObject);
Var
I: Integer;
Ole: oleVariant;
The begin
Ole:=WebBrowser1 OleObject. Document. All;
For I:=0 to ole. Do length - 1
The begin
If ole. Item (I). The tagName='INPUT' then
The begin
Ole. Item (I). The value:=IntToStr (I);
end;
end;
CodePudding user response:
You this web page is multistage nested framework.. You how to add, directly. You first research framework.