FiveTech Software tech support forums

... FROM CUSTOMER" )   oRec  := FW_Record():New( oRs )   oRec:Edit()   oRec:SetPrompt( { { "first", "Name" }, { "Last", "Surname" }, ;      ...

For me is OK

Antonio , can you take a look at :
viewtopic.php?f=3&t=28844#p162156

Thanks
Maurizio
http://www.nipeservice.com

Maurizio, This example is working fine here: #include "FiveWin.ch"#define MF_ENABLED       0#define MF_GRAYED        1#define MF_DISABLED      2#define MF_BITMAP        4#define MF_CHECKED       8#define M...

Maurizio,

Reviewing it... thanks

Antonio , Error description: Error BASE/1066 Argument error: conditional TMENUITEM:SETPROMPT( 349 ) If( ::oMenu != nil .and. ( ::oMenu:l2007 .OR. ::oMenu:L2010 ), MF_OWNERDRAW, 0 ) ) because l2007 amd l2010 are nil. #include "FiveWin.ch"#define MF_ENABLED ...

Maurizio,

What error you get ?

Thank Antonio ,
my fault ,

just a question , why

? oMenu:GetMenuItem(ID_TEST):cCaption --->>> About ResMenu Test...


oMenu:GetMenuItem(ID_TEST):cCaption := "FWH power " ERROR

Regards MAurizio

... ACTION oWnd:End()   REDEFINE MENUITEM ID ID_DELETE OF oMenu ACTION MsgInfo( "ok: Delete" )   oItem2:SetPrompt( "FWH power" )return oMenu

Maurizio,

Not a very good quality photo but it is there

Maurizio,

Here it is working fine.

Have you properly implemented the changes that I told you ? Please check them.

...  REDEFINE MENUITEM ID ID_DELETE OF oMenu ACTION MsgInfo( "ok: Delete" )         oItem2:SetPrompt( "Cambiado" )return oMenu//----------------------------------------------------------------------------//   

The error comes from here: If( ::oMenu != nil .and. ( ::oMenu:l2007 .OR. ::oMenu:L2010 ), MF_OWNERDRAW, 0 ) ) because l2007 amd l2010 are nil. With the change for Class TMenu Method Redefine(): ::l2007 = .F. // new ::l2010 = .F. // new those datas are logical and there is no error.

Maurizio,

Have you modified both the menu.ch and the menu.prg ? Here it works with no error.

Anyhow, if you send me your menu RC portion, I build it here and send you a screenshot.

Antonio , same error , I think that the error is in METHOD SetPrompt( cPrompt ) CLASS TMenuItem If( ::oMenu != nil .and. ( ::oMenu:l2007 .OR. ::oMenu:L2010 ), MF_OWNERDRAW, 0 ) ) if I exclude all works /* nFlags := nOR( If( ::lActive, MF_ENABLED,; nOR( ...

Maurizio, Several changes are required in order to fix this FWH bug. First menu.ch has to be changed like this: In menu.ch: #xcommand REDEFINE MENUITEM [ <oMenuItem> ] ;             [ PROMPT <cPrompt> ] ;         ...