Hallo Tom,
hmm, habe jetzt einiges ausprobiert, aber es klappt nicht.
Der Support schreibt nur, das Sie mit XBase++ keine Erfahrungen haben
das habe ich bisher probiert:
1. Mit Trialversion:
Code: Alles auswählen
local cClsID1:="TIS.TX.LicManager.21"
local cClsID2:="TIS.TX.TextControl.21"
local cClsID3:="TIS.TX.ButtonBarControl.21"
local cClsID4:="TIS.TX.StatusBarControl.21"
local cClsID5:="TIS.TX.RulerBarControl.21"
oTxLicence := CreateObject( "TIS.TX.LicManager.21" )
@ 0,20 DCACTIVEXCONTROL oTxButtons CLSID cClsID3 SIZE 900,30 PIXEL
@ 30,20 DCACTIVEXCONTROL oTxRuler CLSID cClsID5 SIZE 900,30 PIXEL
@ 65,20 DCACTIVEXCONTROL oTxControl CLSID cClsID2 SIZE 900,900 PIXEL
@780,20 DCACTIVEXCONTROL oTxStatus CLSID cClsID4 SIZE 900,30 PIXEL
...
DCREAD GUI .... EVAL {|| oTxControl:ViewMode:=2, ;
oTxButtons:PosStyle:=0, oTxButtons:PosZoom:=0, ;
oTxControl:ButtonBarHandle:=oTxButtons:hWnd, ;
oTxControl:RulerHandle:=oTxRuler:hWnd, ;
oTxStatus:ShowSectionCounter:=.F., ;
oTxStatus:ShowLocale:=.F., ;
oTxControl:StatusBarHandle:=oTxStatus:hWnd }
Das läuft soweit alles, es kommt immer der Hinweis auf die Trialversion.
Jetzt habe ich versucht, meine Lizenznummer einzubinden über:
Code: Alles auswählen
oTxControl:license:="T......."
oder/und
oTxLicense:license:="T..."
oder/und
@ 65,20 DCACTIVEXCONTROL oTxControl CLSID cClsID2 SIZE 900,900 PIXEL LICENSE "T...."
Entweder kommt immer noch der Hinweis auf die Trialversion oder die Fehlermeldung
"Could not Create ActiveXControl..."
Hast du noch einen Ansatz, wie/was man noch probieren könnte ?