FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Sensative Say ( ssay class )
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Sensative Say ( ssay class )
Posted: Tue May 27, 2008 01:09 PM

To All

Just upgraded to FWH805 and I have an 'about' box that uses the Sensative Say class.

What Sensative Say gets me is a hi-lited 'mouse over' and a transparent SAY over a bitmap.

The part that does not seem to be working is the transparent part .. In FWH 805 I seem to have lost the transparency and I have a white background ( block ) over my bitmap instead of being transparent ..

Any Ideas here ??
Rick Lipkin

//-------------------------
Static Func _Webhelp( cOLDDEFA, dEXE )

LOCAL oDLG,oBMP,oFONT1

DEFINE DIALOG oDLG TITLE "About" WINDOW oWIND ;
FROM 50,50 to 370, 550 PIXEL

/* suggestion by antonio .. but no transparency

@ 150,2 SAY oSay PROMPT "Revision Date "+dtoc( dEXE )+;
" "+FWVERSION+" "+VERSION() PIXEL of oDLG

oSay:lWantClick = .T.
oSay:bLClicked = { || MsgInfo( "click" ) }

*/

@ 150,2 SENSITIVE SAY "Revision Date "+dtoc( dEXE )+;
" "+FWVERSION+" "+VERSION() PIXEL TRANSPARENT of oDLG;
COLOR CLR_GRAY COLOROVER CLR_BLACK;
ACTION NIL

ACTIVATE DIALOG oDLG ;
ON PAINT oDLG:SayBitmap( 0,0, cOLDDEFA+"\SPLASH.BMP",;
oDLG:nWIDTH, oDLG:nHEIGHT )

RETURN(NIL)

Posts: 92
Joined: Fri Nov 18, 2005 11:15 PM
Sensative Say ( ssay class )
Posted: Tue May 27, 2008 08:55 PM

you have to erase the clause TRANSPARENT and it works.

Ralph

Ralph del Castillo

Lima PERU

Fwh 24.07, xHb123_10193, MySQL 8.x, BCC 7.3
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Sensative Say ( ssay class )
Posted: Wed May 28, 2008 01:16 AM

Ralph

The mouseover part works great ... unfortunitly I have a blue bitmap ( logo ) for which I want the transparency of the say .. unfortunitly .. instead of being transparent .. it is a white block that covers the bitmap.

Removing the transparent clause .. has no effect unfortunitly.

Rick Lipkin

Continue the discussion