Position form in upper right corner of other form ?

[Lukael]

Hi,



I created a form with "Print","Save to PDF" and "E-mail" buttons to show them when Report is opened in print preview mode. How can I posititon this form to open in upper right corner of Report ?

I tried this, but form doesn't open exactly in right corner:

DoCmd.OpenForm "ReportButtons", acNormal
Forms![ReportButtonsj].Move Left:=Reports![MyReport].WindowLeft + Reports![MyReport].Width - Forms![ReportButtonsj].Width, Top:=Reports![MyReport].WindowTop

Any ideas ?

[cyanidem]

So where does it open? Screenshot?

[Lukael]

Here it is, take a look.

[cyanidem]

No idea why would it position it this way.
Have you tried DoCmd.MoveSize in Resize event instead of Form.Move?

[cyanidem]

Oh, BTW, I don't know if it's spelling mistake or on purpose:

DoCmd.OpenForm "ReportButtons", acNormal
Forms![ReportButtonsj].Move Left:=Reports![MyReport].WindowLeft + Reports![MyReport].Width - Forms![ReportButtonsj].Width, Top:=Reports![MyReport].WindowTop

ReportButtons - ReportButtonsj

[cyanidem]

Looks like it somehow doesn't consider window frames. I got different results depending on Border Style (None, Thin, Dialog, etc.)
So I guess it's just up to trial and error method. You need to move it a bit down and right manually in code.

[Lukael]

Oh, BTW, I don't know if it's spelling mistake or on purpose:

Yes It's a mistake, I replace my code for better understanding.

No idea why would it position it this way.

I believe that It has to do something with Report print preview - size of Report is smaller than print preview, so windows move based to print preview and not Report Itself.

I'm trying with Do.cmd MoveSize now, but whatever I try It keeps opening in weird places. I'll have to test a little bit. Or do you maybe know what should work ?

[cyanidem]

Maybe because .MoveSize uses different coordinates (Right, Down, Width, Height) than .Move (Left, Top, Width, Height).

[Lukael]

So I guess it's just up to trial and error method. You need to move it a bit down and right manually in code.

I would do manually, but unfortunally that doesn't work on different screen resolutions, and I need that. Damn, why cant Print preview just allow command buttons, It's all because of that.

[cyanidem]

Maybe create custom ribbon for report print preview only with those buttons you need?

[Lukael]

No, I cannot create ribbon for that, I actually hide ribbon in my app. I tried this and It works better :

Forms![ReportButtons].Move Left:=Reports![MyReport].WindowLeft + Reports![MyReport].WindowWidth - Forms![ReportButtons].Width, Top:=Reports![MyReport].WindowTop