Q&A

  • Variant
Option Explicit

Const clsName = "machPro_c.clsMach"

Public Function getInfo(ByVal mem_id As String, ByVal mem_pw As String, ByVal card_cd As String) As Variant()



Dim retarr(3)



retarr(1) = 'aaa'

retarr(2) = 'bb'

retarr(3) = 'vv'

End Function



VB에서 위와 같이 만들어진 DLL을 델파이에서는 어떻게 써야할지 모르겠네요

Variant()가 아니고 String은 잘되는데

Variant()인 경우는 모르겠습니다



조언 부탁드립니다





이 게시물을
2  COMMENTS
  • Profile
    쩌비 • 2001.11.07 23:30
    최유순 wrote:

    > Option Explicit

    > Const clsName = "machPro_c.clsMach"

    > Public Function getInfo(ByVal mem_id As String, ByVal mem_pw As String, ByVal card_cd As String) As Variant()

    >

    > Dim retarr(3)

    >

    > retarr(1) = 'aaa'

    > retarr(2) = 'bb'

    > retarr(3) = 'vv'

    > End Function

    >

    > VB에서 위와 같이 만들어진 DLL을 델파이에서는 어떻게 써야할지 모르겠네요

    > Variant()가 아니고 String은 잘되는데

    > Variant()인 경우는 모르겠습니다

    >

    > 조언 부탁드립니다

    >

    >

  • Profile
    최유순 • 2001.11.07 23:44
    쩌비 wrote:

    > 최유순 wrote:

    > > Option Explicit

    > > Const clsName = "machPro_c.clsMach"

    > > Public Function getInfo(ByVal mem_id As String, ByVal mem_pw As String, ByVal card_cd As String) As Variant()

    > >

    > > Dim retarr(3)

    > >

    > > retarr(1) = 'aaa'

    > > retarr(2) = 'bb'

    > > retarr(3) = 'vv'

    > > End Function

    > >

    > > VB에서 위와 같이 만들어진 DLL을 델파이에서는 어떻게 써야할지 모르겠네요



    > > Variant()가 아니고 String은 잘되는데

    > > Variant()인 경우는 모르겠습니다

    > >

    > > 조언 부탁드립니다

    > >

    > >





    Variant로 해보았지만 안돼요
←First Page
1504 1505 1506 1507 1508 1509 1510 1511 1512 1513
Last Page→
한델 로그인 하기