Domino 9 und frühere Versionen > ND9: Entwicklung

Remote Binding

(1/4) > >>

Jürgen Schomann:
Ich habe eine Ansicht mit folgendem Code:

(Globals)
(Declarations)
Dim uiview As NotesUIView

und

Sub SetFocus(Source As NotesUIDocument, Continue As Variant)
   Call uiview.SelectDocument(Source.Document)
End Sub

und eine Aktion

Sub Click(Source As Button)
   Dim ws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uiview = ws.CurrentView
   Set uidoc = ws.ComposeDocument (server, datei, maske)
   On Event Queryclose From uidoc Call SetFocus
End Sub

Aber irgendwie scheint es nicht zu funktionieren.
Beim Schließen des Dokuments wird die Prozedur SetFocus nicht durchlaufen.
Habe dazu mal eine Zeile Msgbox 99 eingefügt.
Es kommt keine Meldung und das Dokument wird auch nicht selektiert.
Was könnte falsch sein?

Gruß Jürgen

Peter Klett:
Mal ins Blaue geschossen, habe mit solchen Bindings noch nichts gemacht

Sub Click(Source As Button)
   Dim ws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uiview = ws.CurrentView
   Set uidoc = ws.ComposeDocument (server, datei, maske)
   On Event Queryclose From uidoc Call SetFocus (uidoc, Continue)
End Sub

Wobei das Continue noch definiert werden müsste

Jürgen Schomann:
Peter, Parameter kann man nicht angeben beim EventHandler: kommt Syntaxfehler.

Habe hier im Forum gesucht und ähnliche Beiträge gefunden.

http://atnotes.de/index.php/topic,55577.msg358438.html#msg358438

Gruß Jürgen

Ralf_M_Petter:
Kannst du mal den Code der SetFocus Prozedur zeigen?

spookycoder:
Hallo,

wie schon dem von Dir verlinkten Beitrag erwähnt, solltest Du das uiDocument als globale Variable hinterlegen und in der OnClick-Methode setzen.

Auf diese globale Variable kannst Du dann auch in Deiner SetFocus Methode zugreifen, sodass diese keine Parameter mehr hat - weil wie Du bereits gemerkt hast - dürfen Event-Handler keine Parameter haben.

lg

Harald

Navigation

[0] Themen-Index

[#] Nächste Seite