Q&A

  • ocx의 olevariant사용???
ocx를 사용하는데요..
vb의 예가 있더군요..
그 예는 다음과 같습니다.
Private Sub getfileextents_Click()
Dim range(6) As Long
ocx_name.getfileextents range
List1.Clear
List1.AddItem "low coordinate"
List1.AddItem Str$(range(0)) + "," + Str$(range(1)) + "," + Str$(range(2))
List1.AddItem "high coordinate"
List1.AddItem Str$(range(3)) + "," + Str$(range(4)) + "," + Str$(range(5))
End Sub

잘 되더군요.
그런데 delphi에서 아래와 같이 하니

procedure TForm1.N1Click(Sender: TObject);
var
MyArray:array[0..5] of Integer;
begin
ocx_name.getfileextents(MyArray);
end;

incompatible types: 'olevariant' and 'array' 라는 에러가 나오더군요.
어떻게 해야 하는 것인지
vb에서처럼 여섯개의 값을 읽고 싶은데 미치겠군요..
아시는분은 빠른 답변 부탁드립니다.
그럼 좋은 하루되세요...

0  COMMENTS