Страница 2 из 3 ПерваяПервая 123 ПоследняяПоследняя
Показано с 11 по 20 из 23

Тема: Modbus master на Delphi 7 с исходниками.

  1. #11

    По умолчанию

    Огромная благодарность kandiral'у!
    Во вложении пример использования его библиотек в готовом проекте: два трм'a и частотник опрашивает плк 160, которого в свою очередь опрашивают панель 270 и пк-программа. ПЛК создает архив 3х значений в файле. С помощью библиотеки кандираловского PLCCommander'a программа забирает файл архива и создает таблицу в ексель.
    Вложения Вложения

  2. #12

    По умолчанию

    Спасибо, коллега! На базе Ваших исходников собрали стенд проверки датчиков давления ПД100. Все отлично функционирует.
    Вложения Вложения

  3. #13

    По умолчанию

    Всем привет. Пользую delphi TIdModBusClient.

    .ReadHoldingRegisters(1, 34, Data);
    Вопрос к знатокам:
    Как слепить из data[3] и data[4] real?
    В плк100 в них находится float.

  4. #14

    По умолчанию

    Scream, для целых сработает. Но тут float должен получиться в итоге.
    Почему то не вижу сообщения на форуме, только на почте.

  5. #15
    Пользователь
    Регистрация
    24.07.2012
    Адрес
    Россия
    Сообщений
    1,492

    По умолчанию

    Цитата Сообщение от PavelGO Посмотреть сообщение
    Scream, для целых сработает. Но тут float должен получиться в итоге.
    Почему то не вижу сообщения на форуме, только на почте.
    Потому что я подумал, и удалил, с плавающей не пройдет, соглашусь.

  6. #16

    По умолчанию

    Перевернул регистры и move в single(32bit). Целая часть правильная, а дробная гуляет сильно.
    Может формат не совпадает. Сколько каких бит выделяется кодесисом на м,э и знак не могу найти инфы, только диапазоны.
    Разобрался. Спасибо за участие.
    Последний раз редактировалось PavelGO; 24.07.2015 в 15:56.

  7. #17

    По умолчанию

    function MBRegsToSINGLE(AData: TRegisters): Single;
    var
    dw: Cardinal;
    p: pointer;
    begin
    dw:=AData[0];
    dw:=dw or (Cardinal(AData[1]) shl 16);
    p:=@dw;
    Result:=Single(p^);
    end;
    end;

  8. #18

    По умолчанию

    Здравствуйте форумчане!
    Кто-нибудь может подсказать как использовать модуль уважаемого kandiral'а относительно CoDeSys 3.5 (СПК207)?
    Или другой способ для организации связи по ModBus TCP с программой, разработка которой предполагается в IDE Delphi XE.
    Буду очень благодарен.

  9. #19
    Пользователь
    Регистрация
    08.12.2014
    Адрес
    г.Тейково Ивановской обл.
    Сообщений
    236

    По умолчанию

    Спасибо ! Во всех смыслах работа полезная.
    С уважением Kon48

  10. #20

    По умолчанию

    Продолжение темы, где представлен инструментарий с более расширенными возможностями
    http://www.owen.ru/forum/showthread.php?t=25735

Страница 2 из 3 ПерваяПервая 123 ПоследняяПоследняя

Похожие темы

  1. Ответов: 5
    Последнее сообщение: 14.10.2010, 14:42
  2. MODBUS master
    от D!m@ в разделе ПЛК1хх
    Ответов: 2
    Последнее сообщение: 10.06.2010, 20:53
  3. ПЛК как modbus-master
    от Slev в разделе ПЛК1хх
    Ответов: 5
    Последнее сообщение: 13.10.2009, 21:51
  4. Два Modbus(Master)
    от Zjrin Alexandr в разделе ПЛК1хх
    Ответов: 2
    Последнее сообщение: 08.06.2009, 11:15
  5. Modbus(Master)
    от uvwxyz в разделе ПЛК1хх
    Ответов: 5
    Последнее сообщение: 12.08.2007, 20:39

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •