Hi David,
Thanks again for the prompt reply but I'm getting an error trying to run this code. This is the setup code for the test:
Sub TestPropertyObjects
Dim obj, storedObj
Set obj = Sys.Process("smartwin").VCLObject("StockForm").VCLObject("pagMain").VCLObject("tabDetails").VCLObject("panDetailsMain").VCLObject("panPricingOtherSwitchesTaxes").VCLObject("panPrices")
Set storedObj = Objects.StoredObject("StockPrice")
Call Log.Message(CompareObjects(obj, storedObj, ""))
Set obj = nothing
Set storedObj = nothing
End Sub
I get an "Object Does Not Support This Property or method" exception when the script tries to execute the line "if Not child Then ret = False" in the CompareObjects function.
At the point of executing this line child.FullName evaluates to Sys.Process("smartwin").VCLObject("StockForm").VCLObject("pagMain").VCLObject("tabDetails").VCLObject("panDetailsMain").VCLObject("panPricingOtherSwitchesTaxes").VCLObject("panPrices").VCLObject("edtCostRate")
which appears to me to be correct because edtCostRate is the first field on the form that is being checked.
Any help would be appreciated.
Thanks again
Bill