<unit name="ok_dispid_method.pas">
<description><detailed>Testcase for bug "[ 1403317 ] Error parsing automatically generated unit"</detailed></description>
<structure name="INetFwOpenPortsDisp" name_with_generic="INetFwOpenPortsDisp" type="dispinterface">
<ancestor name="IDispInterface" declaration="IDispInterface" />
<function name="Add" type="procedure" declaration="procedure Add(const Port: INetFwOpenPort); dispid 2; ">
</function>
<function name="Remove" type="procedure" declaration="procedure Remove(portNumber: Integer; ipProtocol: NET_FW_IP_PROTOCOL_); dispid 3; ">
</function>
<function name="Item" type="function" declaration="function Item(portNumber: Integer; ipProtocol: NET_FW_IP_PROTOCOL_): INetFwOpenPort; dispid 4; ">
</function>
<property name="Count" indexdecl="" type="Integer" reader="" writer="" default="0" defaultid="" nodefault="0" storedid="">
</property>
<property name="_NewEnum" indexdecl="" type="IUnknown" reader="" writer="" default="0" defaultid="" nodefault="0" storedid="">
</property>
</structure>
</unit>
|