Bug on FWH_0801
Posted: Wed Jan 23, 2008 1:17 am
Antonio,
Following example shows trouble on Tsay with 'box' or 'raised' in FWH_0801, may you check it ?
Thank & Regards.
Chiang Ming-Song
*---------------------------------------------
#include "FiveWin.ch"
*=============================================
proc Main()
*---------------------------------------------
local oWnd
DEFINE WINDOW oWnd FROM 10, 10 TO 500,500 pixel TITLE 'Test say raised'
*--------
@ 0, 1 say Space(2) Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_HGRAY
@ 25, 1 say Space(2) Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_RED
@ 50, 1 say 'Raised' Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_RED
@ 75, 1 say 'Raised' Size 100, 20 of oWnd pixel raised Color CLR_WHITE, CLR_HGRAY
@ 125, 1 say Space(2) Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_HGRAY
@ 150, 1 say Space(2) Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_RED
@ 175, 1 say 'Box' Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_RED
@ 200, 1 say 'Box' Size 100, 20 of oWnd pixel box Color CLR_WHITE, CLR_HGRAY
@ 250, 1 say Space(2) Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_HGRAY
@ 275, 1 say Space(2) Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_RED
@ 300, 1 say 'Plain' Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_RED
@ 325, 1 say 'Plain' Size 100, 20 of oWnd pixel Color CLR_WHITE, CLR_HGRAY
*----------
ACTIVATE WINDOW oWnd
*---------------------------------------------
Following example shows trouble on Tsay with 'box' or 'raised' in FWH_0801, may you check it ?
Thank & Regards.
Chiang Ming-Song
*---------------------------------------------
#include "FiveWin.ch"
*=============================================
proc Main()
*---------------------------------------------
local oWnd
DEFINE WINDOW oWnd FROM 10, 10 TO 500,500 pixel TITLE 'Test say raised'
*--------
@ 0, 1 say Space(2) Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_HGRAY
@ 25, 1 say Space(2) Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_RED
@ 50, 1 say 'Raised' Size 100, 20 of oWnd pixel raised Color CLR_HGRAY, CLR_RED
@ 75, 1 say 'Raised' Size 100, 20 of oWnd pixel raised Color CLR_WHITE, CLR_HGRAY
@ 125, 1 say Space(2) Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_HGRAY
@ 150, 1 say Space(2) Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_RED
@ 175, 1 say 'Box' Size 100, 20 of oWnd pixel box Color CLR_HGRAY, CLR_RED
@ 200, 1 say 'Box' Size 100, 20 of oWnd pixel box Color CLR_WHITE, CLR_HGRAY
@ 250, 1 say Space(2) Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_HGRAY
@ 275, 1 say Space(2) Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_RED
@ 300, 1 say 'Plain' Size 100, 20 of oWnd pixel Color CLR_HGRAY, CLR_RED
@ 325, 1 say 'Plain' Size 100, 20 of oWnd pixel Color CLR_WHITE, CLR_HGRAY
*----------
ACTIVATE WINDOW oWnd
*---------------------------------------------