Domino 9 und frühere Versionen > ND8: Entwicklung

Dialogbox einer Datenbank aufrufen

<< < (2/2)

S2000:
... öffne über das smarticon ein dokument in der DB in welcher deine dialogbox ist. Nutze das QO oder PO um deine Dialogbox anzuzeigen. Die Events kannst Du dann mit einem Continue=False 'abbrechen'. Nutze ich so für diverse 'Service-Aktionen'.

Gruß
Armin

Lloyd:
Hallo Armin,
genau das habe ich gesucht. Funktioniert prima.

Vielen Dank.

Lloyd:
Hallo Armin,
ich muss doch nochmal eine Frage stellen: Im PostOpen der Maske öffne ich meine Dialogbox. Klicke ich in der Dialogbox auf "OK", dann schliesst sich die Dialogbox und die Maske dahinter auch. Klicke ich auf "Abbrechen" oder drücke "Escape" schliesst sich zwar die Dialogbox, aber die Maske dahinter bleibt offen. Irgendwie läuft er das QueryOpen dann nicht mehr weiter durch. Ich habe über diverse Prints gesehen dass er das PostOpen nur weiter durchläuft wenn ich in der Dialogbox auf "OK" klicke. Woran könnte das liegen ?

Dim Source As NotesUIDocument
Dim answer As Boolean
answer = ws.DialogBox( "Erfassung", True, True, False, False, False, False, "Dokument anlegen",dok,False,False,True)
If answer = True Then
...
...
End If
Call Source.Close(True)

Lloyd:
Jetzt hab ich zumindest eine Möglichkeit gefunden wie ich das umgehen kann. Wenn ich das "Call Source.Close(True)" direkt nach dem Öffnen der Dialogbox durchführe, schliesst sich die Maske im Hintergrund auf alle Fälle immer. Mich würde aber dennoch interessieren warum der PostOpen nicht weiter durchläuft wenn ich die Dialogbox abbreche, vielleicht hat jemand eine Antwort für mich, damit ich auch verstehe warum das so passiert.

Dim Source As NotesUIDocument
Dim answer As Boolean
answer = ws.DialogBox( "Erfassung", True, True, False, False, False, False, "Dokument anlegen",dok,False,False,True)
Call Source.Close(True)
If answer = True Then
...
...
End If

S2000:
... ich verwende inzwischen hierfür nur noch das Queropen (da ich dann auch mehrere Dokumente markieren kann). Der Code muss immer an das "Continue = False" kommen, dann sollte die maske immer zugehen (d.h. nie aufgehen, das tut sie nur noch bei einem fehler ...).

Gruß
Armin

Navigation

[0] Themen-Index

[*] Vorherige Sete

Zur normalen Ansicht wechseln