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

[Constantin A Chervonenko]

Ни у кого нет опыта интеграции LN-приложения с нестандартным оборудованием?

Надо из COM1 несколько байт прочесть

 

[lmike]

на java можно

Ссылка скрыта от гостей

Ссылка скрыта от гостей

и его юзание

Ссылка скрыта от гостей

почему java - проще вызывать (чем нативные библы из LS) и имеет кроссплатформенную обёртку

 

[Constantin A Chervonenko]

на java можно
..
почему java - проще вызывать (чем нативные библы из LS) и имеет кроссплатформенную обёртку

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

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

 

[lmike]

ну учитывая присутствие бриджа LS2J использование будет не сложнее КОМа, я тут описывал - как, с примером (для эхель либы)
обрабтка, в это случае, ошибок выводится в ЛС

 

[nvyush]

Для вызова 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]