diff --git a/include/epanet2.cs b/include/epanet2.cs index 3f40b4c..bb82d0b 100644 --- a/include/epanet2.cs +++ b/include/epanet2.cs @@ -665,7 +665,7 @@ namespace EpanetCSharpLibrary public static extern int ENsetcontrol(int index, int type, int linkIndex, float setting, int nodeIndex, float level); [DllImport(EPANETDLL, EntryPoint = "ENgetcontrolenabled")] - public static extern int ENgetcontrolenabled(int index, int out_enabled); + public static extern int ENgetcontrolenabled(int index, ref int out_enabled); [DllImport(EPANETDLL, EntryPoint = "ENsetcontrolenabled")] public static extern int ENsetcontrolenabled(int index, int enabled); @@ -715,7 +715,7 @@ namespace EpanetCSharpLibrary public static extern int ENsetelseaction(int ruleIndex, int actionIndex, int linkIndex, int status, float setting); [DllImport(EPANETDLL, EntryPoint = "ENgetruleenabled")] - public static extern int ENgetruleenabled(int index, int out_enabled); + public static extern int ENgetruleenabled(int index, ref int out_enabled); [DllImport(EPANETDLL, EntryPoint = "ENsetruleenabled")] public static extern int ENsetruleenabled(int index, int enabled); diff --git a/include/epanet2.pas b/include/epanet2.pas index 45e6a5d..3f5d09c 100644 --- a/include/epanet2.pas +++ b/include/epanet2.pas @@ -450,8 +450,8 @@ const function ENdeletecontrol(Index: Integer): Integer; cdecl; external EpanetLib; function ENgetcontrol(Index: Integer; var Ctype: Integer; var Link: Integer; var Setting: Single; var Node: Integer; var Level: Single): Integer; cdecl; external EpanetLib; function ENsetcontrol(Index: Integer; Ctype: Integer; Link: Integer; Setting: Single; Node: Integer; Level: Single): Integer; cdecl; external EpanetLib; - function ENgetcontrolenabled(Index: Integer; out_enabled: Integer): Integer; cdecl; external EpanetLib; - function ENsetcontrolenabled(Index: Integer; var enabled: Integer): Integer; cdecl; external EpanetLib; + function ENgetcontrolenabled(Index: Integer; var out_enabled: Integer): Integer; cdecl; external EpanetLib; + function ENsetcontrolenabled(Index: Integer; enabled: Integer): Integer; cdecl; external EpanetLib; {Rule-Based Control Functions} function ENaddrule(Rule: PAnsiChar): Integer; cdecl; external EpanetLib; @@ -476,7 +476,7 @@ const var Status: Integer; var Setting: Single): Integer; cdecl; external EpanetLib; function ENsetelseaction(RuleIndex: Integer; ActionIndex: Integer; LinkIndex: Integer; Status: Integer; Setting: Single): Integer; cdecl; external EpanetLib; - function ENgetruleenabled(Index: Integer; var enabled: Integer): Integer; cdecl; external EpanetLib; + function ENgetruleenabled(Index: Integer; var out_enabled: Integer): Integer; cdecl; external EpanetLib; function ENsetruleenabled(Index: Integer; enabled: Integer): Integer; cdecl; external EpanetLib; implementation