Page 1 of 1

make user type with two windows objects

Posted: Tue Jul 10, 2007 9:34 am
by PaPi
Hi!
I`d like to make an owvn new type. The name is LabEd. LabEd be contained two object:
a Label and  a Text, end to end. Firstly the Label, afterward the Text, next to Label.
Bat my program don`t work. Why?
[code]`test_labed by PaPi
dim myform as form

type labed
     dim parent as object
     dim left as integer
     dim top as integer
     dim width as integer
     dim caption as string
     dim text as string
     dim lab as label
           lab.parent=parent
           lab.left=left
           lab.top=top+3
           lab.caption=caption
     dim ed as edit
           ed.parent=parent
           ed.left=lab.left+lab.width+10
           ed.top=top
           ed.width=width
end type

dim le1 as labed
     le1.left=10
     le1.top=10
     le1.width=180
     le1.parent=myform
     le1.caption=" Data for test #1"

dim le2 as labed
     le2.left=10
     le2.top=110
     le2.width=180
     le2.parent=myform
     le2.caption=" Data for test #2"

myform.width=300
myform.height=300
myform.ShowModal

showmessage le1.caption+" = "+le1.text
showmessage le2.caption+" = "+le2.text



[/code]

best regard PaPi

make user type with two windows objects

Posted: Wed Jul 11, 2007 8:38 pm
by Marco
Not everything is possible, using type with multiple object are not really supported.
It need a lot of workaround to do that. But i notice it to be a point for the next version of fnx basic.
And you can only use a type within a form if it is an extended type.
type bla as panel, for example.

best regards