Thanks... Nice Job!!!!sudip wrote:Hello,
Finally I created Editbox control. It's very basic.
#command was initially taken from TextBox control, I shall change later.
This is the first time I did it. I never did SVN Commit before. Very basic work. But I learned many things from this experience.
Hello Roberto, Rathi and others,
Please check my code and send your advice. And please correct any mistake in my code.
Thank you all.
Some observations:
1. Please, add a commentary when commit changes (Tortoise commit window- 'message' frame) and don't forget to add a list with modified/deleted/added files (right click->Paste filename list ).
2. Other important thing is that you must 'double code' for prior/post control creation, since you can't access to a QT object before that this be created (done at Create() method executed by default at window activation).
So, your code must look at this:
Code: Select all
If ::lCreated
* Access to QT object (ie)
If pcount() == 0
Return ::oQTObject:Something
ElseIf pcount() == 1
::oOQTObject:Something(xValue)
EndIf
Else
* Access to instance variables only (ie)
If pcount() == 0
Return ::xVar
ElseIf pcount() == 1
::xVar := xValue
EndIf
EndIf