How can I position a dialog box directly under/above an editline or

drop downlist?

On date fields I use a button to launch the POPUP_MONTH form using

dialog_box(…). I would like create a SP that gets the top and bottom of the current control and passes either to launch the dialog box.

Thanks

Bruce,

Popup_Month should automatically position itself correctly above or below your editline. Create an OPTIONS event for the editline that calls Popup_Month using the Dialog_Box() routine and then have your button call the OPTIONS event of this editline.

[email protected]

SRP Computer Solutions, Inc.

Don,

Excuse my ignorance here. Will this do it?

1) I the OPTIONS event for the N_DATE control I put…

GetDate=Dialog_Box('POPUP_MONTH',@Window,'')

If Len(GetDate) Then

 getdate=OCONV(GetDate,"D4/")

 Call Set_Property(@WINDOW:".N_DATE","TEXT",getdate)

End

RETURN 0

2) In the CLICK event for my calendar button

Call Send_Event(@WINDOW:".N_DATE","OPTIONS")

RETURN 0

bc

Bruce,

That's basically it. However, you only need to set a QuickEvent to call POPUP_MONTH. The code that supports POPUP_MONTH automatically updates your control with any selected date.

[email protected]

SRP Computer Solutions, Inc.

It works fine but the calendar is still positioned at the top left of the window. Do I need to pass some parameters?

I took a look at the SSP for popup_month. I'm not sure

why it it positioning itself to the top left corner of the

form but I can probably do what the code is doing to get

it in the right spot.

Thanks Don.

You have to use the method advised by don.

When call ed using your code, the routine does not know the control it is being called from, hense befaults to the current window.

Barry

View this thread on the forum...