Domino 9 und frühere Versionen > ND6: Entwicklung
Neue Maske in minimiertem Fenster
geissbock:
Hallo und danke für die beiden neuen Hinweise. Also mit dem VBScript komm ich nicht klar, fehlt mir dann doch eindeutig die Kompetenz. Da blick ich nicht durch.
Der Lotus Script Hinweis ist da schon besser, das hatte ich bisher vollkommen überlesen. Aber leider funktioniert der auch nicht, das Fenster wird trotzdem im Vollbildmodus aufgerufen, wenn ich das so eingeb:
'Set uidocshow = workspace.ComposeDocument _
'( "", "", "fmFolgeinfo", 100, 50 )
Was heißt denn eigentlich der Satz in der Hilfe:
Note This parameter is obsolete in Release 5.0 but is maintained for backward compatibility.?
Heißt das, der funktioniert unter Notes 6 nicht mehr?
Danke nochmal
koehlerbv:
--- Zitat von: geissbock am 24.11.06 - 14:29:51 ---Was heißt denn eigentlich der Satz in der Hilfe:
Note This parameter is obsolete in Release 5.0 but is maintained for backward compatibility.?
Heißt das, der funktioniert unter Notes 6 nicht mehr?
--- Ende Zitat ---
Das sollte in der DesignerHelp besser heissen:
This parameter is obsolete since Release 5.0 but is maintained for backward compatibility.
Seit R5 spielen diese Parameter keine Rolle mehr. Wenn Du RTFs in der Maske hast, sehe ich keine Chancen mehr, hier was mit reinen Notes-Bordmitteln zu drehen - hier müsstest Du wirklich über die WinAPI ran.
Bernhard
Johnson:
Da Problem wird eher sein, daß du der Funktion SetWindowLong einen Pointer (Speicher-Adresse) auf die zu verwendende WinProc-Funktion übergeben musst.
Die WinProc steuert alle Ereignisse eines Fensters. Also Öffnen, Schließen, Minimieren, Maximieren... selbst das Fragezeichen für die Hilfe. Also alles was du mit dem Fenster machen kannst.
In C/C++ ist das mit dem Pointer auf diese Funktion kein Problem, da Pointer hier ein existensieller Bestandteil der Sprache ist.
In VB muss dazu die Funktion AddressOf verwendet werden. Also "AddressOf WindowProcMinMax".
In LN gibt´s da nen Fehler.
Johnson:
Was ich da vorgeschlagen hab ist Blödsinn!!
Eat this:
--- Code: ---Option Public
Option Declare
Declare Private Function apiGetActiveWindow Lib "user32" Alias "GetActiveWindow" () As Long ' Retrieves the active window.
Declare Private Function apiSetWindowPos Lib "USER32" Alias "SetWindowPos" (Byval lng_hWnd As Long, Byval lng_m As Long, Byval lng_left As Long, Byval lng_top As Long, Byval lng_width As Long, Byval lng_height As Long, Byval lng_flags As Long) As Long
Sub Initialize
Dim hwnd As Long
hwnd = apiGetActiveWindow
Call apiSetWindowPos(hwnd, 0, 2, 2, 200, 200, 0)
End Sub
--- Ende Code ---
Kleine Einschränkung: Das hat bei mir nur getan, wenn das Fenster nicht komplett maximiert oder minimiert ist. Aber um das zu setzen gibt´s bestimmt auch was.
geissbock:
Vielen Dank nochmal für die Tipps und Hinweise, aber wenn ich den ApiCode einsetze macht er mir ja das kompllete Notes-Fenster klein und nicht nur die gerade geöffnete Maske. Es sei denn, ich hab da was falsch eingebunden.
Am besten funzt eigentlich immer noch das weiter oben erwähnt JavaScript. Sollte mich wohl doch mal mehr mit JavaScript beschäftigen. In dem Button ist nicht viel Script drin. Er übergibt eigentlich nur ein paar Werte an die Untermaske. Ist wahrscheinlich ja auch mit JavaScript möglich.
Werd mir mal in der Bib ein schlaues Büchlein leihen gehen.
Vielen Dank nochmal für Euer Input und noch einen schönen Tag
Der Geissbock (jetzt unter Messias Daum)
Navigation
[0] Themen-Index
[*] Vorherige Sete
Zur normalen Ansicht wechseln