Testing Window-Settings, I noticed using the Dialog-Style in System-Settings,
Standard or Classic, transparent gets lost.
Windows- Vista Aero or Vista Basic
Changing to Windows-Standard or Classic
I added Dialog-Background to Sample < Testrad.prg >
Changing the Window-Style, I get the same Result.
- Code: Select all Expand view
// Radio Buttons management sample
#include "FiveWin.ch"
function Main()
local oDlg, oRadMenu, oBrush
local nOption := 2
SET _3DLOOK ON
DEFINE DIALOG oDlg RESOURCE "Radios"
REDEFINE RADIO oRadMenu VAR nOption ID 110, 120, 130, 140, 150 OF oDlg ;
ON CHANGE MsgBeep()
REDEFINE BUTTON ID 100 OF oDlg ACTION oRadMenu:GoNext() ;
WHEN nOption == 3
REDEFINE BUTTON ID 102 OF oDlg ACTION oRadMenu:GoPrev()
ACTIVATE DIALOG oDlg CENTERED ;
ON INIT ( BmpBrush(oDlg), oRadMenu:aItems[ 1 ]:SetText( "Hello" ))
SET _3DLOOK OFF
return nil
//----------------------------------------------------------------------------//
function BmpBrush(oDlg)
local cBitmap := cGetFile( "*.bmp", "Please select a bitmap" )
local oBrush
if ! Empty( cBitmap )
DEFINE BRUSH oBrush FILE cBitmap
SET BRUSH OF oDlg TO oBrush
endif
return nil
Best Regards
Uwe
