Thanks for your support words.
Before starting the team work, I want to work a little more on the base code to establish basic guidelines for development and make your work easier.
To make clear how easy this will be, I'll use textbox's inputmask.
Since Windows API has not native support for InputMask, HMG's inputmask took about two years of work to make it reasonable reliable and stable (for me and various contributors involved in fixing and enhancing).
To have a textBox InputMask using QT as back-end will only need the following:
Code: Select all
*..............................................................................*
METHOD InputMask ( cValue ) CLASS TEXTBOX
If ::lCreated
If Pcount() == 0
RETURN ::oQTObject:InputMask()
ElseIf Pcount() == 1
::oQTObject:SetInputMask( cValue )
EndIf
Else
If Pcount() == 0
RETURN ::cInputMask
ElseIf Pcount() == 1
::cInputMask := cValue
EndIf
EndIf
RETURN Nil