dOPC Client Toolkit
Close
Example
function GetOPCUAClient(DaClient: TdOPCDAClient): TdOPCUAClient; var Connection: TObject; begin if DaClient.OPCConnection <> nil then begin Connection := DaClient.OPCConnection.GetObject; // ticky: get underlying connection object if (Connection <> nil) and (Connection is TdOPCUAConnection) then result := TdOPCUAConnection(Connection).uaClient else raise Exception.Create('connection is not a opc ua server connection'); end else raise Exception.Create('first connect to opc ua server'); end;
Kassl GmbH Copyright © 2024. All rights reserved.