Int flag
OleObject Oleb
Oleb=Create OLEObject

Flag=Oleb. ConnectTonewObject (" CashierPaydll. CashierPay ")
If flag=0 then
MessageBox (" prompt ", "PB call COM components, return messages")
Return
The else
MessageBox (" tip ", string (flag))
End the if


The return value

CodePudding user response:

You call the com component DLL, has registered the didn't;

CodePudding user response:

Object could not be created