Проблема с Notesuiworkspace.prompt

[sanch]

Доброго времени суток!
Проблема в чем, при работе с документом, при определенных условиях вызывается notesUIWorkspace.Prompt, в котором пользователь может ввести комментарий.Текст введенный в Prompt потом записывается в rtitem. Но Prompt обрезает очень длинные строки. Как быть в этой ситуации? Может есть достойная замена?

 

[Medevic]

Для: sanch
DialogBox ?

 

[sanch]

workspace.DialogBox вы это имеете ввиду?
Return value
flag
Boolean. Returns True if the user clicks OK in the dialog box. Returns False if the user clicks Cancel.
как из него вернуть параметры?
И как указать размеры окна?

 

[morpheus]

Для: sanch
)) имееться в виду что в диалок боксе с формой можно ввсети 10 полей, и вернуть кучу значений через поля уже )))

 

[sanch]

Не понял (. На рабочей форме создать диалог боксы и с ними работать?

 

[Omh]

Dim DlgDoc As NotesDocument
Set DlgDoc = db.CreateDocument
If ws.DialogBox("DIALOG_FORM",True, True, False, False, False, False, "TITLE", DlgDoc, True) Then
doc.FLD = DlgDoc.FLD
End If

 

[Medevic]

Для: sanch
Создать форму с полем для ввода. Вызвать DialogBox. Из документа (который укажем в параметре DialogBox) получить значение и вставить его куда надо.
Короче, в хелпе всё есть.

 

[sanch]

Эт я уже понял). А можно ли как нить указать размеры формы?

 

[Omh]

Ограничены внешней таблицей при последнем параметре True (в моём примере).
А вообще, RTFM'нуть неплохо бы было

 

[sanch]

О! разобрался! всем пасиба!