I do not appear to be able to set the font for a LISTBOX unless I use resources.
I am using @ 0,0 LISTBOX oLbx......
DEFINE oFont....
ACTIVATE oFont
I then either want to add "FONT oFont" or oLbx:setFont(oFont)
Is runtime font control not implemented as yet as I note that the font control is commented out in tutor05.prg.
GWard,
Today we have published a new FWPPC build. Please download it.
Tutor05.prg is modified to test fonts.
Antonio,
The fonts work fine.
Unfortunately one of my applications has stopped working that was fine with the last update of 15th October.
Firstly the visibility of the open files has changed as I am getting an "Alias Not Found" error in TWBrose:onPaint where none existed before.
The function ShowRolls() access the datafile which caused the alias error.
STOCKLOC->(DbGoTop())
DEFINE WINDOW oWnd TITLE "Locations" MENU MyLocMenu()
@ 1,2 LISTBOX oLbx FIELDS STOCKLOC->ID,;
str(STOCKLOC->Rolls,4),str(STOCKLOC->CURR_VOL,10,2) ;
HEADERS "Pot","Rolls","Current Vol" SIZE 200,250 OF oWnd ;
FIELDSIZES 30,40,40 UPDATE
oLbx:blClicked := ;
{|nRow,nCol,nKeyFlags| if(oLbx:nAtCol(nCol)=2,ShowRolls(),nil)}
oLbx:lCellStyle := .T.
oLBx:bSkip := {|nRecs| STOCKLOC->(DbSkipper(nRecs))}
oLbx:bLine := {|| {STOCKLOC->Id,;
str(STOCKLOC->Rolls,4),;
str(STOCKLOC->Curr_Vol,10,2)}}
ACTIVATE WINDOW oWnd
I fixed this by opening the required files in Main()
Secondly clicking the 'X' on secondary windows now closes the entire application rather than returning to the previous window.
I believe I can fix this by having the "OK" Icon instead of the 'X' like in the various windows utilised in 'Pocket Word'
How do I configure a window to use 'OK' and return to the previous Window. I need windows rather than dialog in order to use menus.
Many thanks.
GWard,
There is a minor fix we need to implement. We may do it today and we will announce it to download the build again.
DWard,
There is already a new build. Please download it and test it again. Thanks!
Antonio,
Help!!
Have just downloaded latest build now ALL applications and samples with a WINDOW fail with the error
Message not found
TWINDOW:BINIT
stack calls
__ERRT_SBASE(0)
HBOBJECT:ERROR(179)
__EVAL(105)
HBOBJECT:MSGNOTFOUND(0)
TWINDOW:BINIT(169)
MAIN(35)
GWard,
Please download it again and try it again. many thanks for your feedback,
Antonio Linares wrote:GWard,
Please download it again and try it again. many thanks for your feedback,
Antonio Linares wrote:GWard,
Please download it again and try it again. many thanks for your feedback,
