|
: 36 : 36 : 0 |
Now it is very hard to control the content of frames
Please make classes NotesFrameSet, NotesFrame
Example:
Dim nfsCurrent as NotesFrameSet
'ndCurrent - NotesDocument
Set nfsCurrent = ndCurrent.ParentFramSet
Dim v as Variant
v = nfsCurrent.GetFrame("Preview").Content
v can be NotesDocument, NotesView and so on... it is not good, but it is better then nothing... You can make another one:
Dim nfPreview as NotesFrame
Dim strContentType as String
Dim strContentTitle as String
Set nfPreview = nfsCurrent.GetFrame("Preview").
strContentType = nfPreviewas.ContentType
strContentTitle = nfPreviewas.ContentTitle
You can also make Frame Events:
QueryOpen/PostOpen, QueryClose/PostClose and so on |