Blocking dialog with a blocking child dialog

Question

Suppose I have a DialogInput, in which there is a Button. The Button can trigger another DialogInput. Then, according to documentation, I have to add Method->"Queued" to the Button to avoid time out.

However, blocking dialog such as DialogInput blocks queued evalutaion channel, which makes the Button disabled.

The following cases are for demonstration.

1. DialogInput[Button["You have to wait after click", DialogInput[DialogReturn[1]]]] This works but you need to wait for minutes before the dialog prompts up.

2. DialogInput[Button["Doesn't work", DialogInput[DialogReturn[1]], Method->"Queued"]] This does not work because the outer DialogInput blocks the queued evalutaion channel.

Now, if I want a DialogInput with a Button and the Button should trigger another DialogInput, what should I do?

Answer 1

I think there is no general/stable way to prompt kernel blocking dialog from another kernel blocking dialog.

answerPrompt[] := Input["Give me the answer please."];
confirmationPrompt[] := ChoiceDialog["Are you sure?"];

You don't need to do that though. Use the code below in your Do loop to answer and confirm questions:

While[
 answer = answerPrompt[];
 Not @ TrueQ @ confirmationPrompt[]
 ]

answer