Originally Posted by
Ian Smith
Yep - remove the (Self))
An example of how much work has gone into the compiler / code validation in 19.1 - compiles in 19.0 errors in 19.1
Change commited - also committed change to cSigCjPushButton class so that it will compile in pre 19.1 and 19.1
I could get it to compile but it crashed in Flexcom20 in all versions, just in one program. That program contained a WizardPanel developed from an example in Mike Starzen's book, which allowed 'Value' as the button property for 'Label'.
That worked in 19.0 with regular Button based classes but not with the CJ one.
Could trip up somebody else I suppose, if you want to proof it against really old usage you could add 'Value' versions of these at line 444 or thereabouts:
Code:
{ Visibility=Private Obsolete=True }
// To support standard dataflex button code
Procedure Set Label String sCaption
Set psCaption To sCaption
End_Procedure
// To support standard dataflex button code
{ Visibility=Private Obsolete=True }
Function Label Returns String
Function_Return (SigCJProperty(Self, Get_Private_psCaption, Get_ComCaption ))
End_Function