erro em button
Enviado: 10 Ago 2023 08:00
É uma desgraça quando isso acontece.
Aonde tem .NOT. ?
Aonde tem .NOT. ?
Código: Selecionar todos
#include "i_altsyntax.ch"
Código: Selecionar todos
#include "i_altsyntax.ch"
DEFINE BUTTONEX ( xControl )
PARENT ( xDlg )
ROW nRow
COL nCol
WIDTH nWidth
HEIGHT nHeight
ICON cResName
IMAGEWIDTH nWidth - 20
IMAGEHEIGHT nHeight - 20
CAPTION cCaption
ACTION Eval( bAction )
FONTNAME "verdana"
FONTSIZE 9
FONTBOLD .T.
FONTCOLOR GRAY
VERTICAL .T.
BACKCOLOR WHITE
FLAT .T.
NOXPSTYLE .T.
END BUTTONEX
Tudo que for usar minigui, inclua no topo do módulo #include <hmg.ch>; com o tempo vc pode querer enriquecer o modulo e este include que puseste pode não ser o suficiente e quebrar o código.JoséQuintas escreveu:Encontrei DEFINE BUTTONEX nesse ch, e acrescentei.
Código: Selecionar todos
#ifdef HBMK_HAS_HWGUI
#include "hwgui.ch"
#define CODE_HWGUI
#define CODE_HWGUI_OR_HMGE
#endif
#ifdef HBMK_HAS_HMGE
#include "hmg.ch"
#include "i_altsyntax.ch"
#define CODE_HMGE
#define CODE_HWGUI_OR_HMGE
#define CODE_HMGE_OR_OOHG
#endif
#ifdef HBMK_HAS_OOHG
#include "oohg.ch"
#define CODE_OOHG
#define CODE_HMGE_OR_OOHG
#endif