Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 6

Модерирует : ShIvADeSt

 Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125

Открыть новую тему     Написать ответ в эту тему

ShIvADeSt



Moderator		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Продолжение темы Вопросы по Delphi (до версии 2009) - часть 5
Познаем сами, помогаем другим...
Обсуждаем вопросы, не связанные с юникоидными версиями Delphi - для этого есть соответствующая тема (см. ссылки ниже).

 
Правила топика:
    Прежде чем спрашивать:
  1. Желательно изучить вопрос, попытаться найти ответ в прилагаемых мануалах, хелпах и анализируя исходники.
  2. Выполнить поиск по топику (открыть "Версия для печати" и поискать ответ там).
  3. Применить фильтр по разделу "Прикладное программирование". Ответы на многие старые вопросы могли быть даны в отдельных темах.
  4. Продумайте вопрос. На поверхностные вопросы вы получите поверхностные ответы, или вообще ответов не получите.
  5. Желательно указывать версии используемого компилятора и операционной системы.
    Прежде чем отвечать:
  1. Если не можете помочь, не мешайте.
  2. Если уж вы отвечаете на вопрос, давайте ответ по сути.
  3. Если вы не уверены, так и говорите! Ошибочный, но авторитетно звучащий ответ хуже, чем отсутствие ответа.
  4. Задавайте дополнительные вопросы, чтобы получить больше информации.
  • Отсутствие ответа не равносильно игнорированию - иногда участники форума просто не знают ответ. Повторная посылка вопроса не приветствуется. Посты типа "неужели никто не знает ответа..." или "может мне все-таки кто-нибудь ответит" недопустимы.  
  • Все большие куски кода (более 5 строк) оформляем в тег [morе] дабы уменьшить размер поста. FAQ по тегу [morе].

    Некоторые "родственные" топики:
     
  • Вопросы по Delphi (версии 2009-2010 Weaver)
  • Вопросы по компонентам для Delphi, C++ Builder
  • Использование DevExpress
  • Вопросы по Ehlib
  • Компоненты и утилиты для Delphi/BCB/FreePascal/Lazarus - только Open Source
  • Коммерческие компоненты и утилиты для Delphi/BCB
  • кабак программистов :)
     
    См. также: Некоторые полезные ресурсы о Delphi
     
    И старайтесь, чтобы ваш код не попал сюда :)
    • Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 05:13 19-05-2010 | Исправлено: akaGM, 02:33 15-07-2020
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    И снова здрасте!)
     
    Есть интернет адрес https://test-reg.minzdravsakhalin.ru/
    И такой код:
    var
    a:variant;
    begin
    a:=webbrowser1.oleobject.document.getelementbyid('идишник эдита из веб кода');
    a.value:='1234';
    a:=webbrowser1.oleobject.document.getelementbyid('идишник кнопки из веб кода');
    a.click.
    Ранее я делал, а сейчас на сайте переделали все и не катит - нужно чтоб вбивался номер полиса и дата рождения. ранее работало так:
    a:=webbrowser1.oleobject.document.getelementbyid('sernum'); - так едит назывался ранее
    a.value:='тут номер полиса';
     
    Мне нужно в поля полиса и д.р. вбивать нужные. Сейчас сайт перелопатили и все изменилось. Собственно вопрос - как найти id-едитов???
    Заранее спасибо.
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 06:36 10-06-2018 | Исправлено: GRom V, 08:19 11-06-2018
    Frodo_Torbins

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    Откройте эту страницу в браузере и нажмите F12.
    Всего записей: 2319 | Зарегистр. 24-05-2007 | Отправлено: 15:51 11-06-2018
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

    Цитата:
    Откройте эту страницу в браузере и нажмите F12.

    Ну вот переходим на https://test-reg.minzdravsakhalin.ru/
    Нажимаем "записаться на бесплатный прием" -> попадаем на нужную страницу с полем для ввода полиса.
    Нажимаем ф12 - открывается инспектор и... как узнать например ID едита для ввода полиса?
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 01:30 12-06-2018
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    при ф12:
    <div class="er-edit box-sizing-force" onkeyup="Form.snilsKeyUp(this);" contfield="Text" cmptype="ErEdit" title="" id="d3ctrl2631528774599903" isclone="1" clone_uid="cl3021528774600117" name="polis_num__ls"><input maxlength="" placeholder="" class="er-edit__input" type="text"></div>
     
     т.е. id="d3ctrl2631528774599903"  - вроде он, но при  
    a:=webbrowser1.oleobject.document.getelementbyid('d3ctrl2631528774599903');
    a.value:='1234567890123456';
    выскакивает ошибка... почему и как с этим бороться?
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 06:41 12-06-2018 | Исправлено: GRom V, 06:50 12-06-2018
    XenoZ



    Gold Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V
    1. ID может генерироваться заново при каждом запросе;
    2. Вопрос, по сути, к Delphi никакого отношения не имеет.

    ----------
    А оно мне надо?..
    Всего записей: 5478 | Зарегистр. 29-03-2006 | Отправлено: 10:28 12-06-2018
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

    Цитата:
    ID может генерироваться заново при каждом запросе;
    2. Вопрос, по сути, к Delphi никакого отношения не имеет.

    В смысле не имеет - я делал прогу которая вбивает нужные полюса. Все работало пока не изменили сайт. Мне нужно в поля вбивать данные - вот и спрашиваю.
    если ID меняется как быть?
     
    Добавлено:
    еще раз адрес, на всяк. случай
    https://test-reg.minzdravsakhalin.ru/
    Нажимаем "записаться на бесплатный прием" -> попадаем на нужную страницу с полем для ввода полиса.
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 10:54 12-06-2018 | Исправлено: GRom V, 10:55 12-06-2018
    XenoZ



    Gold Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V

    Цитата:
    В смысле не имеет - я делал прогу которая вбивает нужные полюса. Все работало пока не изменили сайт.

    В прямом: изменили сайт - разбирайся с сайтом, Дельфи-то тут каким боком?

    ----------
    А оно мне надо?..
    Всего записей: 5478 | Зарегистр. 29-03-2006 | Отправлено: 12:46 12-06-2018
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

    Цитата:
    В прямом: изменили сайт - разбирайся с сайтом, Дельфи-то тут каким боком?

    Слушай, я дико извиняюсь, давай по существу а?
    Делфи - ок, если так туго с воображением то -  как, средствами делфи, найти нужный едит - если нет вариантов - просто игнорь...
    Есть вопрос и я прошу помощи а не помойки на форуме.  
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 15:31 12-06-2018 | Исправлено: GRom V, 15:33 12-06-2018
    XenoZ



    Gold Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V


    Цитата:
    Есть вопрос и я прошу помощи а не помойки на форуме.

    Судя по предыдущим сообщениям, как раз помощь ты старательно игнорируешь, напрашиваясь на готовое решение. Немного странно, не так ли?
     
    P.S.
    Цитата:
    как, средствами делфи, найти нужный едит
    Чтобы найти, нужно разобраться с кодом сайта. Предлагаешь сделать это за тебя?

    ----------
    А оно мне надо?..
    Всего записей: 5478 | Зарегистр. 29-03-2006 | Отправлено: 15:58 12-06-2018
    Frodo_Torbins

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    Почитайте про XPath, правда я не в курсе, есть ли реализации на Делфи.
    Всего записей: 2319 | Зарегистр. 24-05-2007 | Отправлено: 17:46 12-06-2018
    ShIvADeSt



    Moderator    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

    Цитата:
    Все работало пока не изменили сайт. Мне нужно в поля вбивать данные - вот и спрашиваю.
    если ID меняется как быть?

    Вариантов 2:
    1. Выясняешь алгоритм генерации айдишника
    2. Разбираешься с разметкой, если данный айдишник всегда на одном месте находится, то в цикле удаляешь все лишнее и оставляешь нужный контрол, считываешь для него айдишник и работаешь.  
    Ну и чтобы не было работы с черным ящиком. Вначале выясните, какой айдишник нужен (никто не будет в задачах по Дельфи выяснять ПОЧЕМУ этот айди на сайте не работает), а потом уже спрашивайте, как в коде получить данный параметр.
    Если есть вопросы по работе с сайтом, то идем в веб-программирование.

    ----------
    И создал Бог женщину... Существо получилось злобное, но забавное...
    Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 01:54 13-06-2018
    GRom V

    Full Member    		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    dell
    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 08:36 13-06-2018 | Исправлено: GRom V, 08:01 06-08-2018
    alsterkh

    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Добрый день!
    Может кто подскажет. Файл помощи chm, windows 10 и расположение программы по сети. Windows 10 в последнее время блокирует отображение содержания справки даже после всех танцев с бубнами (https://support.microsoft.com/ru-ru/help/896054/you-cannot-open-remote-content-by-using-the-infotech-protocol-after-yo). На всех страницах помощи одно и тоже "Не удается открыть эту страницу".
    Может кто подскажет решение? (32битная версия Windows 10).
    Всего записей: 181 | Зарегистр. 07-10-2009 | Отправлено: 11:58 11-09-2018
    reenoip



    Advanced Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alsterkh
    решение вроде бы есть:
     

    Цитата:
     
     
        Copy the following 3 DLLs from an unpatched computer to the System32 directory on a test system. Take possession of the DLLs and grant full access beforehand. Testing and feedback.
     
        hhctrl.ocx
        itircl.dll
        itss.dll
     
    For 64-bit Windows, the files must also be copied to the SysWOW64 folder. Let’s see if Microsoft fixes this in June 2018.  

     
    Но причём тут Delphi?
    Всего записей: 1768 | Зарегистр. 10-03-2006 | Отправлено: 10:30 15-09-2018
    alsterkh

    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    reenoip, как причем тут Delphi? Хелп из программы перестал работать. Поищу в понедельник "не пропатченный комп", проверю решение если найду. Спасибо.
    Всего записей: 181 | Зарегистр. 07-10-2009 | Отправлено: 21:11 15-09-2018
    ShIvADeSt



    Moderator    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alsterkh

    Цитата:
    как причем тут Delphi? Хелп из программы перестал работать.

    А если у Вас флешка из Дельфи перестанет открываться из-за того, что у нее файловая система полетела, тоже тут спрашивать будете? Может не будем смешивать причину и следствие...

    ----------
    И создал Бог женщину... Существо получилось злобное, но забавное...
    Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:43 17-09-2018
    alsterkh

    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    reenoip, январские указанные библиотеки помогли вернуть работоспособность помощи! спасибо.
     
    ShIvADeSt, про флешку спрашивать не буду. Открыть chm по сети можно многими способами, если не из программы по Ф1 написанной на Делфи. Я же не сразу сюда ломанулся. Думал может кто знает, как запускать помощь из Делфи используя стороннюю программу. Может кто нашел быстрый способ обхода последних "истерий" от Microsoft. Может посоветуют в какой другой формат помощь перенести... А тут оказывается, если кто не знает решения, так и норовит тебя "подколоть". Мне кажется в этом случае лучше промолчать.
     
    Всего записей: 181 | Зарегистр. 07-10-2009 | Отправлено: 10:39 17-09-2018
    Frodo_Torbins

    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alsterkh
    Мне кажется, сейчас наилучшим форматом являются обычные HTML-файлы в папке с программой. При желании, там можно организовать все те же фишки, что и в CHM.
    Всего записей: 2319 | Зарегистр. 24-05-2007 | Отправлено: 14:06 17-09-2018
    alsterkh

    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Frodo_Torbins и контекстно-зависимую помощь по F1 (по id активной формы или элемента)?
    Всего записей: 181 | Зарегистр. 07-10-2009 | Отправлено: 14:11 17-09-2018
    ShIvADeSt



    Moderator    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alsterkh

    Цитата:
    А тут оказывается, если кто не знает решения, так и норовит тебя "подколоть". Мне кажется в этом случае лучше промолчать.

    Не оффтопа ради, а понимая для. В windows 7 убрали поддержку формата .hlp. И для их открытия требовалось установить отдельный fix от Microsoft. Это проблема Дельфи или операционной системы? Не уверен, что данная проблема вообще поднималась в данном топике, а вот в Интернете гуглится на раз причем именно в контексте операционной системы.  
    Вас никто не подкалывает. Просто Ваша логика
    Цитата:
    как причем тут Delphi? Хелп из программы перестал работать
    - это как в анекдоте "А если я тебя сейчас монтировкой по лбу стукну, какой у тебя шнурок развяжется"
     


    ----------
    И создал Бог женщину... Существо получилось злобное, но забавное...
    Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 03:42 18-09-2018
    Открыть новую тему     Написать ответ в эту тему

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125

    Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 6


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru