Может ли кто-нибудь помочь мне преобразовать код VB.NET в Delphi?
У меня есть код VB для вызова команды SDK:
Public Class UserInfo
Public axCZKEM1 As New zkemkeeper.CZKEM
Private bIsConnected = False
Private Sub btnConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConnect.Click
bIsConnected = AxCZKEM1.Connect_Net(txtIP.Text.Trim(), Convert.ToInt32(txtPort.Text.Trim()))
If bIsConnected = True Then
MsgBox("Connected")
end if
Я пытаюсь сделать то же самое в Delphi, но при вызове устройства произошла ошибка:
public axCZKEM1:TCZKEM;
public bIsConnected:boolean;
procedure button.click()
begin
bIsconnected := axCZKEM1.connect_net('IP', port);
if bIsconnected = true then begin
showmessage('Connected');
end
end