Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
ABC: Creating EditSpinClass for Edit in place 1999-01-09 -- Bob Gaucher Newsgroups: topspeed.products.c5ee
ADDING A NEW CLASS EDITSPINCLASS
Edit in Place has some very usefull features, EditDropClass,
EditCheckClass, etc. One that is not there is an Edit Spin
Class.
Here is how to add one.
Add to abeip.inc
EditSpinClass CLASS(EditClass),TYPE,MODULE('ABEIP.CLW'), |
LINK('ABEIP.CLW',_ABCLinkMode_) ,DLL(_ABCDllMode_)
CreateControl PROCEDURE,VIRTUAL,PROTECTED
SetAlerts PROCEDURE,VIRTUAL
END
Add to abeip.clw
EditSpinClass.CreateControl PROCEDURE
CODE
SELF.Feq = CREATE(0,CREATE:Spin) !This creates the control
EditSpinClass.SetAlerts PROCEDURE
CODE
SELF.Feq{PROP:Alrt,5} = '' ! The Edit Class Alerts the up and down arrows.
! Spin Class need them to spin.
SELF.Feq{PROP:Alrt,6} = ''
Embedd in EditSpinClass.Init Procedure after Parent Call
SELF.FEQ{PROP:RangeLow} = 1 ! This sets the low and high range of the spin box.
! Put in your own values.
SELF.FEQ{Prop:RangeHigh} = 999
That's it. Now you have an EditSpinClass that will show up
on the list of ABC classes.
Bob Gaucher
Ft Collins, CO
Today is April 19, 2024, 4:30 pm This article has been viewed 35114 times. Google search has resulted in 7 hits on this article since January 25, 2004.
|
|