отобразить кнопку после нажатия другой кнопки - PullRequest
0 голосов
/ 08 апреля 2019

Я использую IBM Domino Designer 9. Итак, у меня есть кнопка «Сохранить» и другая кнопка «Создать форму», когда пользователь нажимает «Сохранить», другая кнопка будет отображаться

Код кнопки «Сохранить»:

@Command([FileSave])

Код кнопки «Создать форму»:

Sub Click(Source As Button)

    Dim Stream As NotesStream
    Set Stream=Session.CreateStream
    f=Freefile
    fichier="d:\"+Masque.FieldGetText("nomF")+".dxl"
    Open fichier For Output As #f
    Stream.Open(fichier)

    Call Stream.WriteText(|<database xmlns="http://www.lotus.com/dxl" version="8.5" maintenanceversion="3.0" replicaid="41257FA4002BD8B9" path="CN=PFE/O=AISA!!E_admini.nsf" title="E_administrateur 2015..2016">|)
    Call Stream.WriteText(|<databaseinfo dbid="41257FA4002BD8B9" odsversion="43" diskspace="1142784" percentused="75.5600358422939" numberofdocuments="12">|)
    Call Stream.WriteText(|<datamodified>|)
    Call Stream.WriteText(|<datetime dst="true">|+Now+|</datetime>|)
    Call Stream.WriteText(|</datamodified>|)
    Call Stream.WriteText(|<designmodified>|)
    Call Stream.WriteText(|<datetime dst="true">|+Now+|</datetime>|)
    Call Stream.WriteText(|</designmodified>|)
    Call Stream.WriteText(|</databaseinfo>|)
    Call Stream.WriteText(|<form name="|+Masque.FieldGetText("nomF")+|" nocompose="true" publicaccess="false" designerversion="8.5.3" recalc="true" renderpassthrough="true">|)
%REM    
    Call Stream.WriteText(|<updatedby>|)
    Call Stream.WriteText(|<name>CN=admin/O=AISA</name>|)
    Call Stream.WriteText(|</updatedby>|)
    Call Stream.WriteText(|<wassignedby>|)
    Call Stream.WriteText(|<name>CN=admin/O=AISA</name>|)
    Call Stream.WriteText(|</wassignedby>|)
%END REM
    Call Stream.WriteText(|<globals>|)
...................
    Stream.Close

End Sub

1 Ответ

1 голос
/ 09 апреля 2019

Чтобы отобразить и скрыть кнопки в форме заметок, необходимо использовать формулы скрытия когда.

Вам нужно будет положить две кнопки в стол. Таким образом, они будут в отдельных абзацах, поэтому они могут иметь свои собственные формулы скрытия. Абзац вашей кнопки «Сохранить» будет иметь следующую формулу скрытия:

! IsNewDoc

Абзац кнопки CreateForm будет иметь эту скрытую формулу:

IsNewDoc

Вам также необходимо добавить команду для кнопки «Сохранить»:

@Command([FileSave]);
@Command([RefreshHideFormulas]);
...