Re: Printing Area Too Small

Could it be that you have some status information printing ?
Default output will go to the active window, and since that is a very
small size I guess VFP chokes a bit on it.

Check the settings of SET TALK, SET SCORE, SET ALTE, and a few more..
:-)

You might even have a ? put in for debugging, that you forgot about...

On Thu, 19 Jul 2007 10:53:17 -0400, "Jeff Grippe" <jeff@xxxxxxxxx>
wrote:

One more piece of information regarding the code mentioned below:

The makeregular can be called by another form using systax like

loThatForm.makeregular

When I call it from an external form I do not get the "Printing Area Too
Small" error.

It only happens when I call the method from the form itself.

Jeff

"Jeff Grippe" <jeff@xxxxxxxxx> wrote in message
news:139uqehndg7191a@xxxxxxxxxxxxxxxxxxxxx
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






.