Consultor Eletrônico



Kbase P55392: Invalid Font Index: 2161 is greater than max value (4470)
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   9/26/2005
Status: Unverified

FACT(s) (Environment):

Progress 9.1Dx
Windows 2000 SP4
Windows XP

SYMPTOM(s):

Invalid Font Index: 2161 is greater than max value (4470)

CAUSE:

1- create a smart window

2- create a browse widget "aBrowse" on any table

3- override initializeObject in smart window and add code (either before or after RUN SUPER):
MESSAGE "aBrowse:FRAME:FONT = " aBrowse:FRAME:FONT IN FRAME {&FRAME-NAME} VIEW-AS ALERT-BOX.

aBrowse:FONT IN FRAME {&FRAME-NAME} = aBrowse:FRAME:FONT.

4- run the program, see that the message shows that the value of aBrowse:FRAME:FONT is '?' (the default font), see the error 4470 saying that we are trying to assign an invalid font value in thousands (each run produces a different font index in the error)

Variants:

- use "FRAME {&FRAME-NAME}:FONT" instead of "aBrowse:FRAME:FONT" :
aBrowse:FONT IN FRAME {&FRAME-NAME} = FRAME {&FRAME-NAME}:FONT.
--> font is still '?', no error occurs

- assign the value of "aBrowse:FRAME:FONT" to an intermediate variable:
DEFINE VARIABLE iFrameFont AS INTEGER NO-UNDO.
iFrameFont = aBrowse:FRAME:FONT.
aBrowse:FONT IN FRAME {&FRAME-NAME} = iFrameFont.
--> font is still '?', no error occurs

CAUSE:

BUG# 20031120-033

FIX:

This issue has been fixed in PROGRESS: 10.0B