>>>Not the same thing.
>>>
>>>Your command makes the zoom at 75%.
>>>My command makes the report designer windows full screen.
>>>
>>>But yes, your command works.
>>
>>Diane,
>>
>>I tried it on my pc and it zoomed the MAX.
>>
>>Don't know why it stops at 75% on your pc.
>>
>>I wanted to avoid the window name since the name changes.
>>
>>Do you have a standard routine to print/preview ?
>>
>>I picked up this from google
>>
>>

>>&& source :  Fred Taylor
>>
>>oForm = CREATEOBJECT("Form")
>>WITH oForm
>> .Caption = "whatever"
>> .WindowState = 2    && Maximized
>> .Show()
>>ENDWITH
>>REPORT FORM yourreport PREVIEW WINDOW (oForm.Name)
>>oForm.Release()
>>

>
>
>It works to maximize the windows but I'll have to remove the code that refers to "report designer" in each reports which I'm trying to avoid right now.
>
>I found out that if I remove the file vfp8rfra.dll from the computer I run the exe, then I don't get an error. This could be a quick work around for me as long as my clients don't have another application in VFP8.
>
>I'm still looking around for a more solid solution.

Diane,

Could you replace the code in each report (yes I know you want to avoid that) with a call to a function ? eg ReportZoom()

If any changes will be necessary in the future, then they can be made in one place.

Anyway, changing all the reports cannot take that long, can it ? And wouldn't that be a more solid solution compared to removing vfp8rfra.dll ?

&& ReportZoom

do case
case upper(tcprint) <> 'PREVIEW'

case wexist('Report Designer')
    zoom window ('Report Designer') max

case wexist("Generateur d'etats")
     zoom window ("Generateur d'etats") max  && je n'ai pas d'accents sur mon clavier qwerty

otherwise  && if they have german tomorrow, there will be no error
     keyboard '{CTRL+F10}' plain

endcase