Test case for Delphi anonymous methods
TSimpleProcedure = reference to procedure; |
TSimpleFunction = reference to function(x: string): Integer; |
TSimpleProcedure = reference to procedure; |
description of |
TSimpleFunction = reference to function(x: string): Integer; |
description of |