Hello Antonio,
I agree you said not easy.
But I think Why we choice FWH, because it's able to offer easy code from complex WinAPI, of course. I hope ActiveX DLL or OCX.
Regards,
Richard ![]()
Hello Antonio,
I agree you said not easy.
But I think Why we choice FWH, because it's able to offer easy code from complex WinAPI, of course. I hope ActiveX DLL or OCX.
Regards,
Richard ![]()
Hello Antonio,
>This is a Visual Basic sample for the Ribbon ActiveX. Do you think that this is easy or simple ?
Easy or not is not the question. Fact is that we need RibbonBar now.
Hello Oskar,
thank you for the example.
Do make the source public?
Regards
Otto
#include "FiveWin.ch"
#define ID_TAB_WRITE 5004
#define ID_GROUP_CLIPBOARD 5001
function Main()
local oWnd, oCommandBars, oRibbonBar, oTabWrite, oGroups, oGroupClipborad
DEFINE WINDOW oWnd
// Begin XtremeCommandBars.CommandBars CommandBars
oCommandBars = TActiveX():New( oWnd, "Codejock.CommandBarsFrame.10.2" )
oCommandBars:SetSize( 200, 100 )
// Set RibbonBar = CommandBars.AddRibbonBar("The Ribbon")
oRibbonBar = oCommandBars:Do( "AddRibbonBar", "The Ribbon" )
// Set TabWrite = RibbonBar.InsertTab(0, "Writ&e")
oTabWrite = OleInvoke( oRibbonBar, "InsertTab", 0, "Writ&e" )
// TabWrite.Id = ID_TAB_WRITE
OleSetProperty( oTabWrite, "Id", ID_TAB_WRITE )
// Set GroupClipborad = TabWrite.Groups.AddGroup("&Clipboard", ID_GROUP_CLIPBOARD)
oGroups = OleGetProperty( oTabWrite, "Groups" )
oGroupClipborad = OleInvoke( oGroups, "AddGroup", "&Clipboard", ID_GROUP_CLIPBOARD )
MsgInfo( oGroupClipborad ) // A numeric value different from zero shows that it is a valid handle
ACTIVATE WINDOW oWnd
return nilHello Antonio,
thank you for your help.
Although you have shown me the way how to address RibbonBar-ocx I am not able to implement RibbonBar on my own.
At the moment this does not matter. In the meantime till FW implements an own RibbonBar I will use the time for making the layout for my WINHOTEL version 2007.
Regards
Otto
Mr Antonio
Bringing back this topic discussed long time back. We are not looking for ribbon bar control from FW now. ViaCoral is providing for those who are interested in using their product.
You said in this discussion that we can get some similar functionality with windows ribbon bars and tool bars in folders. Yes, but we miss the beauty of our FWH 2007 button bar.
Instead of toolbars we like to use office2007 buttonbars of FWH. If we can fit the buttonbars in folders and use it instead of single buttonbar we get some functionality similar to office2007 ribbon bar
nageswaragunupudi wrote:Mr Antonio
Bringing back this topic discussed long time back. We are not looking for ribbon bar control from FW now. ViaCoral is providing for those who are interested in using their product.
You said in this discussion that we can get some similar functionality with windows ribbon bars and tool bars in folders. Yes, but we miss the beauty of our FWH 2007 button bar.
Instead of toolbars we like to use office2007 buttonbars of FWH. If we can fit the buttonbars in folders and use it instead of single buttonbar we get some functionality similar to office2007 ribbon bar


Very good Mr. Richard.
Even ViaCoral also makes it easy.
But I try to do as much as I can with FWH, without relying on 3rd party tools. With some effort the effect similar to your second picture can be created with FWH, if we can put FWH buttonbars in folders/
nageswaragunupudi wrote:Very good Mr. Richard.
Even ViaCoral also makes it easy.
But I try to do as much as I can with FWH, without relying on 3rd party tools. With some effort the effect similar to your second picture can be created with FWH, if we can put FWH buttonbars in folders/
Otto,
Have you contacted the support at Codejock directly ? I have had some communication and they are very good about replying. I've looked at their library, but presently what I'm doing is different. However, their library seems to work well, and their support is very good about responding.
Tim
TimStone wrote:Otto,
Have you contacted the support at Codejock directly ? I have had some communication and they are very good about replying. I've looked at their library, but presently what I'm doing is different. However, their library seems to work well, and their support is very good about responding.
Tim
Richard,
I believe I had enough information so it would be possible to use the Codejock system, and I had the concept for how to use the memory model with DBF files. It is a complete calendar system.
I did not proceed because the project I needed to build didn't seem to fit with a standard Outlook Calendar view. I may do that later. I also did not feel the Ribbon Bar was a good option for the program I'm currently maintaining.
However, I was very pleased with their communication and willingness to work with me when I am ready. I think others may have observed the same thing.
Tim

DEFINE WINDOW oWnd TITLE "Testing rebars and toolbars" ;
MENU BuildMenu()
oReBar = TReBar():New( oWnd )
oPanel := TPanel():New( 0, 0, 75, 300, oReBar )
oImageList = TImageList():New()
oImageList:AddMasked( TBitmap():Define( , "\fwh\bitmaps\16x16\new2.bmp", oWnd ),;
nRGB( 255, 0, 255 ) )
oImageList:AddMasked( TBitmap():Define( , "\fwh\bitmaps\16x16\open2.bmp", oWnd ),;
nRGB( 255, 0, 255 ) )
oImageList:Add( TBitmap():Define( , "\fwh\bitmaps\16x16\icon.bmp", oWnd ),;
TBitmap():Define( , "\fwh\bitmaps\16x16\icoMask.bmp", oWnd ) )
@ 10, 2 FOLDER oFolder PROMPTS "One", "Two", "Three" SIZE 400, 62
oToolBar2 = TToolBar():New( oFolder:aDialogs[ 1 ],,, oImageList )
oToolBar2:AddButton( { || MsgInfo( "pointer" ) }, "pointer" )
oToolBar2:AddSeparator()
oToolBar2:AddButton( ,"label" )
oToolBar2:AddButton( ,"button" )
oReBar:InsertBand( oFolder )