Q&A

  • [질문]olevariant 형변환 문제인데 모르겠어요??
var FPData : array [0..511] of byte;

위와 같이 선언된 변수에 값을 세팅하고 oleVariant로 정의된 ActiveX dll에
값을 넘겨줘야하는데 어떻게 형변환을 해야하는지 정말 모르겠네요...

고수님들의 답변 부탁드립니다.

아래에도 이와 비슷한 질문 올렸는데 답변이 없어 계속 삽질 중입니다. ㅠ.ㅠ
...
1  COMMENTS
  • Profile
    최용일 2008.12.02 02:11
    VarArrayCreate로 배열을 만들어서 넘겨주세요.

    var
    FPData: array[0..511] of Byte;
    OleData: Variant;
    OleDataPtr: Pointer
    begin
    ......

    // 배열 생성
    OleData := VarArrayCreate([0, 511], varByte);

    // 배열에 값 설정
    OleDataPtr := VarArrayLock(OleData);
    try
    Move(FPData[0], OleDataPtr^, SizeOf(FPData));
    finally
    VarArrayUnlock(OleData);
    end;

    ......
    end;