Mr Kramek

I think the ability to do that with form designer is

helpful and necessary, And i think it is very easy for foxteam

to implementate that after I have tested the follow code.

They work well. The fox7(or early) may already supports that interior.


Do you consider that is breaking the principal of OOP ?


PUBLIC o
o=CREATEOBJECT('form1')
o.show

?o.command1.Added_Property
? ''
? ''
o.command1.Added_Method()

*-------------------------
DEFINE CLASS form1 AS form

DoCreate = .T.
Caption = "Hack in class"
Name = "Form1"
autoCenter=.t.

ADD OBJECT command1 AS commandbutton WITH ;
Top = 10, ;
Left = 250, ;
Height = 25, ;
Width = 100, ;
Caption = "Command1", ;
Name = "Command1",;
Added_Property = 'the value of property '


PROCEDURE command1.Added_Method
? 'the method does works'
ENDPROC

ENDDEFINE
*-----------