dialog box conversion

[dik_coleman]

How can I convert this 'text' box (dialog box) into a dialog box that uses ""%dlg% and %code%?
Why you ask!
Well the box is displayed in the center of the screen and covers up information that the user needs to answer the question being posed... I need it moved out of the way..
In a 'regular' dialog box using %dlg% and %code%, you can put in a positioning statement as illustrated below. This statement (command) does not work with this 'box'..
I 'kinda' understand how the boxes work, but can't seem to find the right 'fix' for it...
D


DIM SHARED cusOK_result as N
DIM SHARED cusOK_YES_Button as L
DIM SHARED cusOK_NO_Button as L
DIM SHARED cusOK_CANCEL_Button as L
cusOK_YES_Button = .F.
cusOK_NO_Button = .F.
cusOK_CANCEL_Button = .F.
title_var = "Correct Customer?"
'{position=remember=correct_customer}
message_text_var = ""%text%
If Customer is correct then Press 'Yes' to continue.

If not, Press "No" to choose another customer name.

"Cancel" will exit this process and return to Main Menu.
%text%
cusOK_result=ui_msg_box(title_var,message_text_var,UI_YES_NO_CANCEL+ UI_THIRD_BUTTON_DEFAULT+ UI_QUESTION_SYMBOL)

'Test to see which button on the message box was pressed....
SELECT......etc, etc, etc, more code

[Selwyn Rabins]

RE: dialog box conversion






New Page 2




are you asking how to convert a 'ui_msg_box()' command to an equivalent 'ui_dlg_box()'
command?

or phrased differently, -- you have a dialog box that is displayed by a 'ui_msg_box()'
command, and you would like to instead display the same dialog box using the 'ui_dlg_box()'
so that you can then add additional features to the ui_dlg_box().

if I understand the question, here's how to do it. (you will need some
understanding of Xdialog to follow what I am doing here - if you have not yet
gone through the 'learning xdialog' tutorial, now would be a good time)
message_text_var = ""%text%
If Customer is correct then Press 'Yes' to continue.

If not, Press "No" to choose another customer name.

"Cancel" will exit this process and return to Main Menu.
%text%
title_var = "Message title"


'cusOK_result=ui_msg_box(title_var,message_text_var,UI_YES_NO_CANCEL+
UI_THIRD_BUTTON_DEFAULT+ UI_QUESTION_SYMBOL)

'ui_msg_box("","" + cusOK_result)


dim cusOK_result as n
ui_dlg_box(title_var,""%dlg%
{text=100,5:message_text_var};
{lf};
{justify=center}
"10&Yes!yes" "10&No!no" {initial_focus}"10&Cancel!cancel";
%dlg%,""%code%

if a_dlg_button = "Yes" then
cusOK_result = ui_yes_selected
else if a_dlg_button = "NO" then
cusOK_result = ui_NO_selected
else if a_dlg_button = "cancel" then
cusOK_result = ui_cancel_selected
end if
%code%)

ui_msg_box("","" + cusOK_result)

[dik_coleman]

RE: dialog box conversion

thank you very much..
I spent a few hours going over things and came up with a dialog box that accomplished what I needed, but I caused more problems than I had to start with...
Now the repeat lookup when saying 'no' to the correct customer box cannot find the form that was originally opened....
Probably something that I changed is causing the problem.
I'll get it fixed...
thanx again
D

[dik_coleman]

RE: dialog box conversion

For what it's worth...
Found the problem, it's fixed
Onward......
D