Работа С Соm-портом

Тема в разделе "Lotus - Программирование", создана пользователем Constantin A Chervonenko, 2 ноя 2011.

Наш партнер Genesis Hackspace
  1. Constantin A Chervonenko

    Constantin A Chervonenko Well-Known Member
    Lotus team

    Регистрация:
    30 май 2006
    Сообщения:
    1.315
    Симпатии:
    4
    Ни у кого нет опыта интеграции LN-приложения с нестандартным оборудованием?

    Надо из COM1 несколько байт прочесть :(
     
  2. lmike

    lmike нет, пердело совершенство
    Команда форума Lotus team

    Регистрация:
    27 авг 2008
    Сообщения:
    6.190
    Симпатии:
    308
  3. Constantin A Chervonenko

    Constantin A Chervonenko Well-Known Member
    Lotus team

    Регистрация:
    30 май 2006
    Сообщения:
    1.315
    Симпатии:
    4
    Ага.. Спасибо. Мотаем на ус. К сожалению, в java я полный профан (в элементарщине: "обвязка", обр.ошибок и т.п..)

    А MSComm (MSCOMM32.ocx) никто не смотрел? Всё равно клиент у нас не особо кроссплатформенный
     
  4. lmike

    lmike нет, пердело совершенство
    Команда форума Lotus team

    Регистрация:
    27 авг 2008
    Сообщения:
    6.190
    Симпатии:
    308
    ну учитывая присутствие бриджа LS2J использование будет не сложнее КОМа, я тут описывал - как, с примером (для эхель либы)
    обрабтка, в это случае, ошибок выводится в ЛС
     
  5. nvyush

    nvyush Well-Known Member
    Lotus team

    Регистрация:
    22 апр 2009
    Сообщения:
    2.317
    Симпатии:
    0
    Для вызова java из LS использую примерно такие конструкции:
    <!--shcode--><pre><code class='java'>Uselsx "*javacon"
    Sub SomeJavaFunction(...)
    On Error Goto ErrorHandler
    On Error 318 Goto Error318

    Dim jSession As JavaSession
    Dim jClass As JavaClass
    Dim jMethod As JavaMethod
    Dim jError As JavaError
    Dim jErrorStackTrace As String

    Set jSession = New JavaSession()
    Set jClass = jSession.GetClass(...)
    Set jMethod = jClass.GetMethod(...)
    SomeJavaFunction = jMethod.Invoke(, ...)
    Exit Function
    Error318:
    Set jError = jSession.getLastJavaError()
    jErrorStackTrace = jError.StackTrace
    Call jSession.ClearJavaError()
    ErrorHandler:
    MsgBox(Error + {
    } + jErrorStackTrace)
    End Function[/CODE]
     
Загрузка...

Поделиться этой страницей