Tsay 'raised' in FWH_0801

Tsay 'raised' in FWH_0801

Postby jhncon » Mon Jan 21, 2008 6:42 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
*---------------------------------------------
jhncon
 
Posts: 8
Joined: Mon Oct 31, 2005 10:11 am

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Antonio Linares, Google [Bot] and 64 guests