|
From: vatzct <va...@po...> - 2011-12-02 08:15:02
|
01.12.2011 17:59, Basso, Luis Fernando ???????(??):
> hi
> fixed
>
> other mode of the resize is use ANCHOR
>
> REGARDS
>
> Luis Fernando Basso
> lf...@vi...
>
>
> local ownd,opan,obtclose, ot1,oPage,oLabel1,oLabel2,opage2,olabel11,olabel21
> local obrw, obrw2
> Local aItems := {"First", "Second", "Third", "Four"}
> init window ownd title "test panel and ..." at 0,0 size 400,500
> @0,0 PANEL oPan SIZE 400,206 //ON SIZE {|o,x,y| o:Move(,,x-10,) }
> oPan:Anchor := 11
> @ 5,5 TAB oPage1 ITEMS {} of oPan SIZE 380,90 //ON SIZE {|o,x,y|
> o:Move(,,x-30,) }
> oPage1:anchor := 11
> BEGIN PAGE 'Tab1' OF oPage1
> @ 10,30 SAY oLabel1 CAPTION "Here Page 1" OF oPage1 SIZE 225,22
> oLabel1:anchor :=11
> @ 10,55 COMBOBOX ocombo ITEMS aItems of oPage1 SIZE 200, 20 //ON SIZE
> {|o,x,y| o:Move(,,x-30,) }
> ocombo:anchor := 11
> END PAGE OF oPage1
>
> BEGIN PAGE 'Tab2' OF oPage1
> @ 10,30 SAY oLabel2 CAPTION "Here Page 2 " OF oPage1 SIZE 225,22
> END PAGE OF oPage1
> @ 10,95 browse obrw ARRAY of oPan size 250,100 //ON SIZE {|o,x,y|
> o:Move(,,x-30,) }
> obrw:anchor := 11
> CreateArList( oBrw, { { "1","qq" }, { "2","ww" }, { "3","ee" }, {
> "4","rr" } } )
>
> @ 5,210 TAB oPage2 ITEMS {} SIZE 360,160 //ON SIZE {|o,x,y|
> o:Move(,,x-30,) }
> oPage2:anchor := 11
> BEGIN PAGE 'Tab1' OF oPage2
> @ 10,30 SAY oLabel11 CAPTION "Here Page 1" OF oPage2 SIZE 225,22
> @ 10,58 browse obrw2 ARRAY size 340,90 of oPage2 //ON SIZE {|o,x,y|
> o:Move(,,x-30,) }
> obrw2:anchor := 11
> CreateArList( oBrw2, { { "1","a" }, { "2","b" }, { "3","c" }, {
> "4","d" } } )
> END PAGE OF oPage2
>
> BEGIN PAGE 'Tab2' OF oPage2
> @ 10,30 SAY oLabel21 CAPTION "Here Page 2" OF oPage2 SIZE 225,22
> END PAGE OF oPage2
>
> @ 20, 375 COMBOBOX ocombo2 ITEMS aItems SIZE 250, 23 //ON SIZE {|o,x,y|
> o:Move(,,x-30,) }
> ocombo2:anchor := 11
>
> @010,400 ownerbutton obtclose text "close" size 60,24 on click
> {||ownd:close()}
> ownd:activate()
>
>
> -----Mensagem Original-----
> From: Basso, Luis Fernando
> Sent: Thursday, December 01, 2011 12:51 PM
> To: lf...@vi...
> Subject: Fw: [Hwgui-developers] on size and htab class
>
>
Now ok, thank you.
Regards,
Alexey Myronenko
|