Главная » Delphi » Интернет и сети » как добраться до значений полей формы html

как добраться до значений полей формы html

23:06
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
var
inputs: Olevariant;
i: integer;
begin
inputs := WebBrowser1.OleObject.document.all.tags('input');
memo1.Clear;
for i := 0 to inputs.length - 1 do
memo1.Lines.Add(inputs.item(i).value);
end;