Hallo Alle,
nein! Ribbon.Bar geht auch für Classic VB!
Allerdings innerhalb von VB schwer, sogar fast unmöglich zu realisieren. Das größte Problem ist eine COM Implementierung des IUIApplication-Interface. Man muss dazu
einen COM-Server "von außen", also über andere Programmiersprachen wie C++/ATL bauen, also einen COM-Server.
Momentan hat der COM-Server diese TypeLib (Auszug):
[propget, id(1), helpstring("hInstance des Application Objekt")] HRESULT _
ApplicationHandle([out, retval] LONG* pVal);
[propput, id(1), helpstring("hInstance des Application Objekt")] HRESULT _
ApplicationHandle([in] LONG newVal);
[propget, id(2), helpstring("Nur wenn von APPLICATION_RIBBON abweichend")] _
HRESULT ResourceName([out, retval] BSTR* pVal);
[propput, id(2), helpstring("Nur wenn von APPLICATION_RIBBON abweichend")] _
HRESULT ResourceName([in] BSTR newVal);
[propget, id(3), helpstring("HWND Handle des Hauptfenster")] HRESULT _
HWNDAppWindow([out, retval] LONG* pVal);
[propput, id(3), helpstring("HWND Handle des Hauptfenster")] HRESULT _
HWNDAppWindow([in] LONG newVal);
[propget, id(4), helpstring("TRUE, wenn das Ribbonframework korrekt" & _
"initialisiert werden konnte")] HRESULT IsFramework([out, retval] VARIANT_BOOL* _
pVal);
[propget, id(5), helpstring("TRUE, wenn die Anwendung für das Ribbon-Framework" & _
"initialisiert worden ist")] HRESULT IsApplicationConnect([out, retval] _
VARIANT_BOOL* pVal);
[id(6), helpstring("Verbindet die Anwendung mit dem Ribbonframework und" & _
"startet den Ribbon-View")] HRESULT RunRibbonBar(void);
[propget, id(7), helpstring("True wenn die Prüfung nach der Ribbon-Resource" & _
"unterbleiben soll")] HRESULT IgnoreResource([out, retval] VARIANT_BOOL* pVal);
[propput, id(7), helpstring("True wenn die Prüfung nach der Ribbon-Resource" & _
"unterbleiben soll")] HRESULT IgnoreResource([in] VARIANT_BOOL newVal);
[id(8), helpstring("Lädt eine Ribbon-Bin Datei zur Laufzeit als Resource." & _
"Geben Sie den vollständigen Pfad zur Datei und Dateiname an.")] HRESULT _
LoadRibbonBinFile([in] BSTR sFileName); Mit der kompilierten Komponente: RibbonSvr (Ribbon-Server) kann jeder ein Ribbon-Menüband in seine Anwendung laden. Die Benutzereingaben kommen als Event. Die Komponente implementiert IUIApplication und IUICommandHandler, die in einen Connectionpoint (EVENT) wiedergegeben werden.
Wer interesse daran hat, einfach eine Mail an mich posten. ich gebe auf Spendenbasis auch Free-Dll's.
In diesem Thread beantworte ich auch gerne Fragen bezüglich Know how über Ribbon (nur die Implementierung in eigene Anwendungen, nicht die XAML-Implementierung des Ribbon-Bands) Die Antworten lassen sich selten in VB-Classic umsetzen, weshalb ich ja den COM-Server anbiete.
Es stellt sich mir die Frage ob man wirklich die Ribbon.BIN zur Laufzeit einbinden darf. Alles in mir
sagt: NEIN! Sie müssen vom Entwickler als Resource manuell eingefügt werden. Gemeint ist damit die Methode: LoadRibbonBinFile( ... ). Ich bin gespannt, was Ihr darüber denkt.
LG
Blackie
Beitrag wurde zuletzt am 26.01.18 um 20:28:28 editiert. |