Page 1 of 1
TABCONTROL ANY FUNCIONALITY ?
Posted: Tue Feb 17, 2009 2:31 pm
by xVar
Hi everebody.
I think Tabs is very good way for make good PPC application (small scree , no task bar etc.)
I try use TABCONTROL , good example is in "testtab.prg". It's OK.
But now I can't make some controls on Tabs.
My code is like this :
//-------------------------------------------------------------------------//
Function MakeTabs(oWnd)
//-------------------------------------------------------------------------//
@ 2, 0 TABCONTROL oTabs PROMPTS { "Browse Data", "Current Data","Default Data"} ;
OPTION 1 ACTION MsgInfo( oTabs:nOption ) ;
SIZE 240, 124 OF oWnd
@ 3, 3 SAY "Name 1:" SIZE 70, 20 OF oTabs:aPrompts[ 1 ]
Return Nil
It is not work.
How is possible define design elements on every tab page?
Regards Andrej.
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Tue Feb 17, 2009 5:50 pm
by Wolfgang Ciriack
Hi,
i use FOLDER, this works like expected.
Code: Select all
@ 1, 1 FOLDER oFld PROMPTS "Auftrag", "Eingaben", "Zusatz", "Abschluß" ;
SIZE 240,290 PIXEL
pagenr:=1
...
@ 70,10 SAY v[F_NAME1] OF oFld:aDialogs[pagenr] SIZE 230, 19 FONT OSayFont2 PIXEL
...
pagenr:=2
zl:=15
...
@zl,40 BUTTON oBtZ PROMPT "Zusatzzeiten" OF oFld:aDialogs[pagenr] SIZE 155, 30 FONT oSayFont3 PIXEL ACTION GetZusatzZeiten(o, v)
...
pagenr:=3
zl:=15
...
@235, 5 BUTTON oBtW PROMPT "<- zurück" OF oFld:aDialogs[pagenr] SIZE 80, 28 FONT oSayFont3 PIXEL ACTION iif(oFld<>NIL, (pagenr:=2, oFld:SetOption(2)), )
@235,150 BUTTON oBtW PROMPT "weiter ->" OF oFld:aDialogs[pagenr] SIZE 80, 28 FONT oSayFont3 PIXEL ACTION iif(oFld<>NIL, (pagenr:=4, oFld:SetOption(4)), )
...
Thanks. I will try.
Posted: Wed Feb 18, 2009 2:05 pm
by xVar
FWPPC documentation is not for beginers
Regards
Andrej
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Wed Feb 18, 2009 11:06 pm
by Antonio Linares
Andrej,
Please review FWPPC\samples\TestFld.prg, TestFld2.prg, TestFld3.prg, testfldb.prg and testfldw.prg
Well its work, but I can refresh get object :(
Posted: Fri Feb 20, 2009 12:06 pm
by xVar
I try next:
-------
......
DEFINE WINDOW oWnd TITLE "Folders"
@ 0.5, 1 FOLDER oFld PROMPTS "Personal", "Job", "Observations" ;
SIZE 225, 245
@ 0.5, 1 SAY "First:" OF oFld:aDialogs[ 1 ] SIZE 30, 15
@ 0.5, 5 GET cFirst OF oFld:aDialogs[ 1 ] SIZE 150, 20
@ 2, 3 BUTTON oBtn PROMPT "Ok" OF oFld:aDialogs[ 1 ] ACTION (cFirst:="cFirst",oFld:Refresh())
ACTIVATE WINDOW oWnd
......
The GET object cFirst is not updated, only if I click to get field get object data is setting to string "cFirst"
.
I try with cFirst:Refresh() is don't work.
Question, how I can set , and refresh my get objects and folders , from code ? ( I need navigate in dbf and refresh get objects i )
Regards. Andrej.
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Fri Feb 20, 2009 6:40 pm
by Antonio Linares
Andrej,
Code: Select all
@ 0.5, 5 GET oGet VAR cFirst OF oFld:aDialogs[ 1 ] SIZE 150, 20
...
oGet:Refresh()
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Mon Feb 23, 2009 2:55 pm
by xVar
Thanks Antonio!
It's work.
One questions about oObj:End()
In example programs I look some like :
//
oBmp:End()
oFont:End()
oFld:End()
//
Need I destroy all my objects (oWnd etc.) before exit application, or it be automatically, if I ending main window.
(for example oWnd:End() )
Regards
Andrej
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Mon Feb 23, 2009 4:32 pm
by Enrico Maria Giordano
Generally speaking, you have to only release the object that you explicitly create and not assign to a FWH control.
EMG
Re: TABCONTROL ANY FUNCIONALITY ?
Posted: Tue Feb 24, 2009 9:02 am
by xVar
Thanks.
Regards.
Andrej-