Проверка наличия поля в webbrowser

[Dima170792]

Здраствуйте, сразу к делу:
Есть код:

l:=webbrowser1.oleobject.document.getelementbyID('user_name');
 l.value:=sMemo1.Text;
  
  p:=webbrowser1.oleobject.document.getelementbyID('user_password');
 p.value:=sMemo2.Text;
 
 
    ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
 
    for z := 0 to (ovElements.Length - 1) do
     if        (ovElements.item(z).Value = 'Вход') then
 
       ovElements.item(z).Click;

подскажите пожалуйста Как перед етим кодом поставить проверку наличия

l

тобиш если на страничке открытой в webbrowser есть полято выполнять

l.value:=sMemo1.Text;

и так далее , а если нет то

Timer1.enabled:=false

[Stilet]

l:=webbrowser1.oleobject.document.getelementbyID('user_name');
if not Varisclear(l) then l.value:=sMemo1.Text;

Или проще: if l<>nil then... Но в последнем я не уверен.

[Dima170792]

Сообщение от Stilet

l:=webbrowser1.oleobject.document.getelementbyID('user_name');
if not Varisclear(l) then l.value:=sMemo1.Text;

Или проще: if l<>nil then... Но в последнем я не уверен.

ОГРОМНОЕ СПАСИБО!!!работает, и еще вопрос- есть кож- который автоматически кликает по клавише "войти" на сайте, открытом в Webbrowser

    ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
    sProgressBar1.Position:=85;
    for z := 0 to (ovElements.Length - 1) do
     if        (ovElements.item(z).Value = 'Войти') then
       sProgressBar1.Position:=90;
       ovElements.item(z).Click;

На нем тоже "ругается" когда клавиши нет, есть ли вариант сделать что то подобное? потому что как ни пробовал- на кнопку представленный вами код не действует

[Stilet]

И как же ты пробовал?

[Dima170792]

Сообщение от Stilet

И как же ты пробовал?

 
if not Varisclear(ovElements) then

ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
    sProgressBar1.Position:=85;
if not Varisclear(z) then 
    for z := 0 to (ovElements.Length - 1) do
     if        (ovElements.item(z).Value = 'Войти') then
       sProgressBar1.Position:=90;
       ovElements.item(z).Click;

В таком плане, при выполннии - всеравно ругаеться на отсутствие кнопки( что я не так сделал?