VB数据类型转DELPHI(100分)

  • 主题发起人 主题发起人 aiken
  • 开始时间 开始时间
A

aiken

Unregistered / Unconfirmed
GUEST, unregistred user!
有VB代码如下:
Attribute VB_Name = "Data"
Public Bit_Area(1000) As Boolean
Public Word_Area(1000) As Integer
Private Sub Start_Click()
function_Start(Data.Bit_Area(0), 1000, Data.Word_Area(0), 1000)
End Sub
需要改成delphi代码,怎么改才不至于“类型不匹配”?
 
var
lBitArea: array[1..1000] of Boolean;
lWordArea: array[1..1000] of Integer;
procedure StartClick()
begin
function_Start(lBitArea[1], 1000, lWordArea[1], 1000);
end;
 
后退
顶部