- Code: Select all Expand view
#include "FiveWin.ch"
//----------------------------------------------------------------------------//
function Main()
local oDlg
SET _3DLOOK ON
DEFINE DIALOG oDlg RESOURCE "Main" COLOR "N/B"
REDEFINE BTNBMP ID 110 OF oDlg ;
RESOURCE "Yes" NOBORDER ACTION oDlg:End()
oDlg:aControls[ 1 ]:lTransparent = .t.
REDEFINE BTNBMP ID 120 OF oDlg ;
RESOURCE "No"
REDEFINE BTNBMP ID 130 OF oDlg ;
RESOURCE "Cancel"
redefine btnbmp id 111 of oDlg resource "cancel"
ACTIVATE DIALOG oDlg CENTERED
return nil
With FWH10.5, I get the error message Unrecoverable error 9003: Too many recursive error handler calls instead of the expected Undefined Id. Can others confirm?
TIA