Page 1 of 1

Sensative Say ( ssay class )

Posted: Tue May 27, 2008 1:09 pm
by Rick Lipkin
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)

Posted: Tue May 27, 2008 8:55 pm
by ralph
you have to erase the clause TRANSPARENT and it works.

Ralph

Posted: Wed May 28, 2008 1:16 am
by Rick Lipkin
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