Hi,

I need to check return values of many API function calls within class. In order to simplify this task I have the following idea: assign a return value to a property of a class and test a value in Assign method for that property.

Define Class test as Custom
	Protected RetVal
	Protected Procedure RetVal_Assign(tnRetVal)
		If tnRetVal != 0
			Error "Error #" + Trans(tnRetVal)
		EndIf
	EndProc
	Procedure SomeMethod()
		This.RetVal = SomeAPIFunction()
	EndProc
EndDefine

However this code will generate an error within line with Error statement, but I want to generate an error within line where API function is called. Any ideas?

TIA,
Alexander