На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Соблюдайте общие правила форума
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Указывайте точные версии Delphi и используемых сетевых библиотек.

Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.

Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Полезные ссылки:
user posted image MSDN Library user posted image FAQ раздела user posted image Поиск по разделу user posted image Как правильно задавать вопросы


Выразить свое отношение к модераторам раздела можно здесь: user posted image Krid, user posted image Rouse_

Модераторы: Krid, Rouse_
  
> программное нажатие web кнопки , не нажимается кнопка.
    ExpandedWrap disabled
      <!--  User Login Form   -->
       
      <form name="login" action="http://192.168.3.97/goform/loginCGI" method="GET">
       
      <table border="0" cellpadding="4" width="600">
       
         <tbody><tr>
           <td class="h1">
           Magmon3 Service Login
           </td>
         </tr>
        
         <tr>
           <td class="txt">
           Enter a Username and Password to proceed.<br>
            
           </td>
         </tr>
        
         <tr>
           <td class="txt">
              Username: <input type="text" size="16" maxlength="16" name="UserName">
           </td>
         </tr>
       
         <tr>
           <td class="txt">
              Password:  <input type="password" size="16" maxlength="16" name="PassWord">
           </td>
         </tr>
        
        
         <tr>
           <td>
             <br><input type="submit" value="Submit" class="Btn1">
           </td>
         </tr>
       
      </tbody></table>
      </form>
       
       </body></html>


    надо программно нажать кнопку. делаю как в примере и нифига!
    ExpandedWrap disabled
      procedure TForm1.Button1Click(Sender: TObject);
      begin
      FillForm(WebBrowser1, 'login', edit1.Text); //Логин
      FillForm(WebBrowser1, 'name', edit2.Text); //ФИО
      FillForm(WebBrowser1, 'email', edit3.Text); //Почта
      FillForm(WebBrowser1, 'password', edit4.Text); //Пароль
      FillForm(WebBrowser1, 'passwordtoo', edit5.Text); //Повторите пароль
       
      if FillForm(WebBrowser1, 'form', 'TRIALANET.RU') = False then
      ShowMessage('Ошибка! Поле "form" не найденно!');
       
      FillForm(WebBrowser1, 'keystring', edit6.Text);  //Каптча
       
      BClick(WebBrowser1, 'Sumbit'); //Кнопка регистрации
       
      end;
       
      end.

    При этом даже если мышкой щёлкнуть на кнопку, то не переходит и не нажимается.
    1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
    0 пользователей:


    Рейтинг@Mail.ru
    [ Script execution time: 0.0474 ]   [ 15 queries used ]   [ Generated: 23.08.26, 22:46 GMT ]