Re: Printing Area Too Small

FYI: I am using VFP 7 SP 1

I can't reproduce it easily because I can't do something with a standard
form created in the form designer that I can do with my subclassed form.
Basically...

I have a subclassed form with no titlebar. I have made my own title bar with
a text area and a button the right hand corner.

When the button is right clicked, the window is resized to height = 40 and
width = 40. When the button is right clicked again, a password is prompted
for using inputbox. It is at this point that the "Printing Area Too Small"
error occurs. Once you acknowledge the error, the inputbox and the rest of
the code proceed normally.

I can't seem to reproduce it with a simpler version. With a new subclassed
form and a few buttons, I can size the form to 20x20 and the inputbox still
proceeds without an error.

When I step through the code in the debugger the error does not occur. What
I see visually is that the inputbox appears and then the error occurs.

Also, I have an ActiveX control on the form which is an RTF editor and that
is what could be generating the error message. I will search the
documentation for the control. Wherever the message is coming from, it is
not identifying itself and it is cryptic.

For what its worth, here is the actual code that generate the error:

RightClick Procedure for the CloseButton button:
IF thisform.Height <> 40 AND thisform.Width <> 40 && not small
thisform.makesmall
ELSE
thisform.makeregular
ENDIF

thisform.makeregular:
SELECT OpenWindows
SET ORDER TO WindowID
LOCATE FOR WindowID = thisform.cWindowID AND UserLogin =
ALLTRIM(_screen.username)
IF NOT EMPTY(OpenWindows.Password)
lcPassword = INPUTBOX("Password")
IF UPPER(ALLTRIM(lcPassword)) <> UPPER(ALLTRIM(OpenWindows.Password))
RETURN
ENDIF
ENDIF
replace Height WITH OriHeight, Width WITH OriWidth
thisform.Height = oriHeight
thisform.Width = oriWidth
thisform.Resize





"Dan Freeman" <spam@xxxxxxxxxxxxx> wrote in message
news:%23Y3qnsXyHHA.1212@xxxxxxxxxxxxxxxxxxxxxxx
That's bizarre.

After 15 years of bizarre error messages, you just came up with a new one.
LOL

That message is not in the list of error messages in the help file, so it
may be coming from something else. Can you share the code (the entire
method) that causes it? Is it reproducible?

Dan

Jeff Grippe wrote:
Hello and thanks in advance for the help....

Does anyone know what the error message

Printing Area Too Small

means?

Does anyone know how to surpress it?

It happens with a very small form when trying to execute the INPUTBOX
function. Once you acknowledge the message, the INPUTBOX works just
fine.
Thanks,
Jeff




.

Loading