Atualizar FWH912 - Group box recurso

[MGA]

Sr. Antonio,

Ao atualizar o FIVEWIN da vs 8.12 para 9.12 esta ocorrendo de, aonde eu tenha uma DIALOG com group box explicitamente declarada como abaixo, os recursos dentro deste GROUP não aparececem, se eu passar o mouse por cima aparece. Outro detalhe, uma vez que passei o mouse e apareceu os recursos, se eu minimizar minha aplicação ao voltar ao normal os recursos dentro do GROUP não aparecem novamente, veja:



prg:

define dialog pemdlg resource "FILTRO" font ownd:ofont icon oicon
redefine get oegets[1] var nMesa id 100 of pemDlg picture "999999"
redefine group oegets[2] prompt " nº:" id 105 of pemDlg transparent

redefine buttonbmp id 4002 of pemdlg bitmap "TOUCH"
redefine buttonbmp id 4003 of pemdlg bitmap "B_REC"
pemdlg:lhelpicon:=.f.
activate dialog pemdlg center


Foi alterado alguma coisa na versao recente do FWH?
O que devo fazer para resolver esta situação, uma vez que afetou todo o meu sistema.

[MGA]

Sr. Antonio,

Consegui simular o problema direto do FWH912\SAMPLES\TESTTRN2.PRG, verifique por favor!

[MGA]

Sr. Antonio,

Resolvi temporariamente assim:

No PellesC troquei a ordem dos controles colocando o(s) grupo(s) como primeiro(s) e depois no fonte coloquei o group como say como no exemplo abaixo:

de

REDEFINE GROUP oGroup1 ID 800 color RGB(255, 0, 0), RGB(182,221,199) of odlg_0002 FONT oFont1 PROMPT "Contatos" TRANSPARENT

para

REDEFINE SAY oGroup1 ID 800 color RGB(255, 0, 0), RGB(182,221,199) of odlg_0002 FONT oFont1 PROMPT "Contatos" TRANSPARENT

Fonte:
http://www.fivewin.com.br/forum/topic.a ... C_ID=14384


Porém, esta solução vai me gerar um transtorno muito grande.

Aguardo uma solução

Obrigado

[Antonio Linares]

SGS,

Esta es la forma correcta en que debe programarse FWH\samples\TestTrn2.prg

Code: Select all  Expand view

#include "FiveWin.ch"

function Main()

   local oBrush, oDlg, oRad, nVal := 1, oCbx, lVal := .T., oGrp

   DEFINE BRUSH oBrush FILENAME "..\bitmaps\rainbow.bmp"

   DEFINE DIALOG oDlg RESOURCE "Test" BRUSH oBrush TRANSPARENT

   REDEFINE RADIO oRad VAR nVal ID 10 OF oDlg
   
   REDEFINE CHECKBOX oCbx VAR lVal ID 20 OF oDlg
   
   REDEFINE GROUP oGrp ID 30 OF oDlg
   
   REDEFINE BUTTON ID 1 OF oDlg ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED
   
   oBrush:End()

return nil
 

TestTrn2.rc

Code: Select all  Expand view

#ifdef __FLAT__
   1 24 "winxp\WindowsXP.Manifest"
#endif

test DIALOG 17, 36, 185, 147
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "Test"
FONT 8, "MS Sans Serif"
{
 GROUPBOX "Group", 30, 18, 26, 145, 62, BS_GROUPBOX
 RADIOBUTTON "Radio", 10, 30, 54, 32, 12, BS_AUTORADIOBUTTON
 CHECKBOX "Checkbox", 20, 79, 54, 46, 12, BS_AUTOCHECKBOX | WS_TABSTOP
 DEFPUSHBUTTON "OK", 1, 67, 128, 50, 14
}
 

[MGA]

Sr. Antonio,
Eu só citei FWH\samples\TestTrn2.prg, como exemplo, eu não estou usando BRUSH. VEJA:

define font fonte_cf name 'Times New Roman' size -0,40 bold

define dialog pemdlg resource "FILTRO66" font ownd:ofont icon oicon

redefine group oegets[2] prompt "Mesa:" id 105 of pemDlg

redefine get oegets[1] var nMesa id 100 of pemDlg picture "999999"

redefine buttonbmp ...
redefine buttonbmp ...
redefine buttonbmp ...

pemdlg:lhelpicon:=.f.
activate dialog pemdlg center
fonte_cf:end()

PELLES, RC:

FILTRO66 DIALOG DISCARDABLE 78, 61, 247, 58
STYLE WS_POPUP|DS_MODALFRAME|WS_CAPTION|WS_SYSMENU|WS_VISIBLE
CAPTION "Cancela SolicitaþÒo de Fechamento"
FONT 8, "MS Sans Serif"
{
CONTROL "", 100, "Edit", ES_RIGHT|ES_AUTOHSCROLL|WS_VSCROLL|WS_BORDER|WS_TABSTOP, 13, 15, 108, 29
CONTROL "&Cancelar ", 150, "Button", WS_TABSTOP, 130, 8, 69, 20
CONTROL "&Abandonar", 160, "Button", WS_TABSTOP, 130, 31, 69, 20
CONTROL "", 4002, "Button", WS_TABSTOP, 202, 8, 39, 43
CONTROL "N·mero:", 105, "Button", BS_GROUPBOX|WS_GROUP, 7, 4, 120, 46
}

[Antonio Linares]

SGS,

Por favor sube esta línea para que sea el primer control del diálogo en el recurso:

CONTROL "N·mero:", 105, "Button", BS_GROUPBOX|WS_GROUP, 7, 4, 120, 46

[MGA]

Sr. Antonio,

Resolveu

Tenho que colocar controls GROUP de todas os meus RC como primeiro recurso?

[Antonio Linares]

Lo grupos tienen que estar definidos en los recursos antes de los controles que contienen