Реализовать интерфейс VFP в vcx - PullRequest
Новая
       6

Реализовать интерфейс VFP в vcx

0 голосов
/ 15 октября 2019

Я пытаюсь получить асинхронное сообщение от com сервера. Приведенный ниже код работает отлично, но моя цель - получить значение из метода в поле списка формы

Код Class.prg 

DEFINE CLASS SoplMsgService AS custom OLEPUBLIC 

IMPLEMENTS  SoplMsgService IN "soplmsg.MsgServiceClient"

PROCEDURE SoplMsgService_MsgRecv(msg AS STRING) AS void
    ? msg

ENDPROC

ENDDEFINE

Код инициализации формы для вызова класса и BindEvent 

PUBLIC com,ocomutil,vfpo

com=CREATEOBJECT("SoplMsg.MsgServiceClient") && this is com dll which has event
vfpo=CREATEOBJECT("SoplMsgService")

EVENTHANDLER(com,vfpo)

com.ClientConnect()

Я пытался сделать vcx, но получил ошибку "EventHandler object SOPLMSGSERVICE1 does not IMPLEMENT an interface"

...