make user type with two windows objects

In this category you can exchange your programming questions and solutions.
Post Reply
PaPi
Posts: 114
Joined: Wed May 16, 2007 11:55 am

make user type with two windows objects

Post: # 112Post PaPi
Tue Jul 10, 2007 9:34 am

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

Marco
Site Admin
Posts: 246
Joined: Sat Sep 15, 2018 8:41 pm

make user type with two windows objects

Post: # 113Post Marco
Wed Jul 11, 2007 8:38 pm

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  

Post Reply