FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour ribbonbar
Posts: 357
Joined: Thu Nov 02, 2006 06:53 PM
ribbonbar
Posted: Wed Jul 03, 2013 05:44 PM

when I linking my sources where I using Ribbon i get error:
my source

  DEFINE RIBBONBAR oRib Window oWnd;
           HEIGHT 130;
           TOPMARGIN 25 ;       
           PROMPT "Dokumenty", "Ewidencja", "Kontrahenci","Raporty","Administrator","Koniec"

oRib:nLeftMargin = 85
oRib:CalcPos()
oRib:SetSize( oWnd:nWidth )

    ADD GROUP oGr1 RIBBONBAR oRib;
              WIDTH 80;
              TO OPTION 1;

    @ 4, 4 ADD BUTTON GROUP oGr1;
           SIZE oGr1:nWidth - 9, oGr1:nHeight - 7;
           PROMPT "Dokumenty";
           BITMAP "OPEN.BMP";
           ACTION MSGINFO( "Test 1" );
           POPUP MENU oMenu

Application

Path and name: P:\wSETOW6\wsetow6.exe (32 bits)
Size: 3,356,672 bytes
Compiler version: xHarbour build 1.2.2 Intl. (SimpLex) (Rev. 9719)
FiveWin Version: FWHX 12.06
Windows version: 6.2, Build 9200

Time from start: 0 hours 0 mins 0 secs
Error occurred at: 2013.07.03, 19:38:53
Error description: Error BASE/1004 Class: 'NIL' has no exported method: HWND
Args:
[ 1] = U

Stack Calls

Called from: => HWND( 0 )
Called from: source\classes\tribbon.prg => TRIBBONBAR:NEW( 325 )
Called from: wSETOW6.PRG => BUILDMENU( 109 )
Called from: wSETOW6.PRG => MAIN( 41 )

best regards

kajot
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: ribbonbar
Posted: Wed Jul 03, 2013 07:28 PM
Kajot,

It does not fail with FWH 13.05 (13.06), so surely it has been fixed since the version that you are using.

Could you please run this test and let me know if it also fails there ? thanks

Code (fw): Select all Collapse
#include "FiveWin.ch"
#include "ribbon.ch"

function Main()

   local oWnd

   DEFINE WINDOW oWNd

   DEFINE RIBBONBAR oRib Window oWnd;
      HEIGHT 130;
      TOPMARGIN 25 ; 
      PROMPT "Dokumenty", "Ewidencja", "Kontrahenci","Raporty","Administrator","Koniec"

   ACTIVATE WINDOW oWnd

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion