Q&A

  • [재질문] 비베-->델파이...
안녕하세요? 좋은 하루되시구요...

다음 비주얼 베이직 문을 델파이로 컨버젼 할 수 있는 방법이 있을까요?

참고로 폼에는 LCAOS라는 ActiveX 컨트롤이 있습니다.

ActiveX 컨트롤은 import시켰습니다...



'global

Dim ActiveLonMarkObject As LcaLonMarkObject

Dim NetworkVariables As LcaNetworkVariables

Dim NVpower1 As LcaNetworkVariable

Dim NVpower2 As LcaNetworkVariable

Dim CPpower1 As LcaConfigProperty



Public Sub DeclareNVCP()

Set NetworkVariables = ActiveLonMarkObject.NetworkVariables

Set NVpower1 = NetworkVariables.Item("nvoPower1")

End Sub



다른 프로시져에서는 위의 NVpower1.value를 에디트 박스에 쓰는 식으로 해서

이용합니다.



델파이로 간단할 것 같은데....(구조체 복사 혹은 오브젝트 복사 같은데...)

꼭 좀 부탁드립니다...

1  COMMENTS
  • Profile
    이정욱 1999.06.28 12:20
    쩝.. 비베는 잘 모르지만....

    옛날 베이직을 참고삼아서.. 흐..



    var

    ActiveLonMarkObject : TLcaLonMarkObject; //요 부분은 아마도 데이터 형이

    NetworkVariables : TLcaNetworkVariables; //ActiveX를 Import했을때

    NVpower1 : TLcaNetworkVariable; //같이 정의되지 않았나 싶네요.

    NVpower2 : TLcaNetworkVariable; //혹시 모르니 앞의 'T'자를 빼고도

    CPpower1 : TLcaConfigProperty; //해보세요.



    Procedure DeclareNVCP()

    begin

    NetworkVariables := ActiveLonMarkObject.NetworkVariables;

    NVpower1 := NetworkVariables.Item('nvoPower1');

    end;



    위 처럼 하면 되지 않을까요?





    송동일 께서 말씀하시기를...

    > 안녕하세요? 좋은 하루되시구요...

    > 다음 비주얼 베이직 문을 델파이로 컨버젼 할 수 있는 방법이 있을까요?

    > 참고로 폼에는 LCAOS라는 ActiveX 컨트롤이 있습니다.

    > ActiveX 컨트롤은 import시켰습니다...

    >

    > 'global

    > Dim ActiveLonMarkObject As LcaLonMarkObject

    > Dim NetworkVariables As LcaNetworkVariables

    > Dim NVpower1 As LcaNetworkVariable

    > Dim NVpower2 As LcaNetworkVariable

    > Dim CPpower1 As LcaConfigProperty

    >

    > Public Sub DeclareNVCP()

    > Set NetworkVariables = ActiveLonMarkObject.NetworkVariables

    > Set NVpower1 = NetworkVariables.Item("nvoPower1")

    > End Sub

    >

    > 다른 프로시져에서는 위의 NVpower1.value를 에디트 박스에 쓰는 식으로 해서

    > 이용합니다.

    >

    > 델파이로 간단할 것 같은데....(구조체 복사 혹은 오브젝트 복사 같은데...)

    > 꼭 좀 부탁드립니다...