Сообщение "Да Нет Отмена"

[Dimch]

Добрый день! Необходимо показывать сообщение (типа CONFIRM) с кнопками выбора Да,Нет,Отмена.
Создавать для этого отдельную форму или использовать STRMENU не хочется.

Сделал так:

IF CREATE(objScript,TRUE) THEN
BEGIN
CR := ' '; CR[1] := 13;
objScript.Language := 'VBScript';
objScript.AddCode(
'function Confirm(who)'+CR+
' Confirm = MsgBox("Òîâàð "&item, 3, "Test")'+CR+
'end function');
s:=objScript.*evаl*('Confirm("Âîïðîñ")');
END;

Но окошко появляется и тут же скрывается под окном клиента NAV. Как это побороть?
Или есть альтернативные решения?

[Fordewind]

Цитата:

Сообщение от Dimch

Добрый день! Необходимо показывать сообщение (типа CONFIRM) с кнопками выбора Да,Нет,Отмена.
Создавать для этого отдельную форму или использовать STRMENU не хочется.

Сделал так:

IF CREATE(objScript,TRUE) THEN
BEGIN
CR := ' '; CR[1] := 13;
objScript.Language := 'VBScript';
objScript.AddCode(
'function Confirm(who)'+CR+
' Confirm = MsgBox("Òîâàð "&item, 3, "Test")'+CR+
'end function');
s:=objScript.*evаl*('Confirm("Âîïðîñ")');
END;

Но окошко появляется и тут же скрывается под окном клиента NAV. Как это побороть?
Или есть альтернативные решения?

А зачем столько вариантов действий пользователя? Можно пример? Мне всегда двух кнопок хватало...

[.Quattro.]

http://msdn.microsoft.com/en-us/library/x83z1d9f(VS.85).aspx

В наве это будет примерно так:

WShell: Automation 'Windows Script Host Object Model'.WshShell	
Title: Text 30
Buttons: Integer
SecToWait: Integer
ResInt: Integer
***************
Title := 'Заголовок сообщения';
Buttons := 3;
CREATE(WShell);
ResInt := WShell.Popup('Текст сообщения',SecToWait,Title, Buttons);

Message('%1', ResInt);

[alexb_imported]

А вот мне нужна комбинация из STRMENU и CONFIRM в одной форме, т.е. что бы в открывшейся форме было скажем 3 опции для выбора и внизу уже упомянутые ДА, НЕТ, ОТМЕНА.
Возможно ли такое средствами 'Windows Script Host'-Automation? И чтобы оба действия: выбранная опция и нажатый юзером button, отлавливались навиженом? И можно ли открытый WSHEL-Popup окрыть как RUNMODAL, чтобы юзер не щёлкал между делом в другие формы?

[Fordewind]

Цитата:

Сообщение от AlexB

А вот мне нужна комбинация из STRMENU и CONFIRM в одной форме, т.е. что бы в открывшейся форме было скажем 3 опции для выбора и внизу уже упомянутые ДА, НЕТ, ОТМЕНА.
Возможно ли такое средствами 'Windows Script Host'-Automation? И чтобы оба действия: выбранная опция и нажатый юзером button, отлавливались навиженом? И можно ли открытый WSHEL-Popup окрыть как RUNMODAL, чтобы юзер не щёлкал между делом в другие формы?

Это такой стеб или Вы серьезно?

[alexb_imported]

Цитата:

Сообщение от Fordewind

Это такой стеб или Вы серьезно?

Это не стеб, я серьёзно. Просто действительно иногда жаль на такие мелочи тратить настоящие NAV-формы. А выдавать юзеру поочерёдно несколько окон для выбора, подтверждения итд. это немного кривовато. Например: 1. окно "Хотите архивировать документ и распечатать: Да/Нет" Юзер выбирает "Да" --> 2. окно: "Хотите распечатать как: факс, e-mail, Ha принтер, HA PDF-принтер?"

[RedFox]

Цитата:

Сообщение от AlexB

Это не стеб, я серьёзно. Просто действительно иногда жаль на такие мелочи тратить настоящие NAV-формы. А выдавать юзеру поочерёдно несколько окон для выбора, подтверждения итд. это немного кривовато. Например: 1. окно "Хотите архивировать документ и распечатать: Да/Нет" Юзер выбирает "Да" --> 2. окно: "Хотите распечатать как: факс, e-mail, Ha принтер, HA PDF-принтер?"

Ну так тут 2 действия, которые совершенно разные и нужно либо делать их комбинацию.
Например STRMENU с заголовком Печать и опциями: Факс, E-mail, печатать нa принтер, печатать на PDF-принтер, Отмена (или Пропустить). Я бы по крайней мере делал так.

[Storkich]

А еще потом потребуется докрутить, чтобы если пользователь не отвечает минуту, чтоб автоматически выбирался отпределённый ответ. Другими словами ответ по таймауту.