FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour RBBTN (SOLUCIONADO)
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Sun Mar 13, 2011 11:25 PM
me funciona bien los ejemplo que pusiste...

sinceramente espero que la tercera sea la vencida.... porque ya desisto de pedirlo....

Daniel Garcia-Gil wrote:Puedes poner un ejemplo que podamos construir para ver el error....


algo simple...

este es el codigo del ejemplo que te menciono (como veras es muy simple)

ejecutalo desde la carpeta de samples
Code (fw): Select all Collapse
#include "FiveWin.ch"
#include "Ribbon.ch"

function Main()

   local oDlg, oPopup, oBtn

   DEFINE DIALOG oDlg RESOURCE "Test"

   REDEFINE RBBTN oBtn ID 100 OF oDlg POPUP ;
      MENU BuildPopup() ROUND ACTION MsgInfo( "click" ) ;
      PROMPT "Class TRBtn" BITMAP "..\bitmaps\16x16\fivetech.bmp" LEFT

   ACTIVATE DIALOG oDlg CENTERED

return nil

function BuildPopup()

   local oPopup
   
   MENU oPopup POPUP 2007
      MENUITEM "One" ACTION MsgInfo( "One" ) FILE "..\bitmaps\16x16\fivetech.bmp"
      MENUITEM "Two" ACTION MsgInfo( "Two" ) FILE "..\bitmaps\16x16\fivetech.bmp"
      SEPARATOR
      MENUITEM "Three" ACTION MsgInfo( "Three" ) FILE "..\bitmaps\16x16\fivetech.bmp"
   ENDMENU
   
return oPopup


RC
Code (fw): Select all Collapse
#include <windows.h>

#ifdef __FLAT__
   1 24 "WinXP/WindowsXP.Manifest"
#endif

#ifdef __64__
   1 24 "WinXP/WindowsXP.Manifest64"
#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" 
{  
   CONTROL "Test", 100, "TRBTN", WS_CHILD | WS_VISIBLE, 10, 15, 80, 20
   DEFPUSHBUTTON "OK", 1, 67, 128, 50, 14 
}
Posts: 336
Joined: Wed May 16, 2007 09:40 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 12:09 AM
Si Daniel, efectivamente funciona como menu principal, pero si tu lo colocas en una segunda ventana te sucede lo que te cuento, el programa que esta aca le agregue lo mismo, pero con una llamada a una segunda ventana, cuando te aparezca la segunda presiona el TAB o tabulador y te daras cuenta que desaparece.... ahh pero en el RES debe crear el MANIFEST

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

function main()

   local oDlg, oPopup, oBtn
   DEFINE DIALOG oDlg RESOURCE "test"

   REDEFINE RBBTN oBtn ID 100 OF oDlg POPUP ;
      ROUND ACTION prg_101() ;
      BITMAP  "..\bitmaps\16x16\fivetech.bmp"LEFT
   ACTIVATE DIALOG oDlg CENTERED

return nil


function prg_101()

   local oDlg, oPopup, oBtn

   DEFINE DIALOG oDlg RESOURCE "test"

   REDEFINE RBBTN oBtn ID 100 OF oDlg POPUP ;
      MENU BuildPopup() ROUND ACTION MsgInfo( "click" ) ;
      BITMAP "..\bitmaps\16x16\fivetech.bmp" LEFT

   ACTIVATE DIALOG oDlg CENTERED

return nil

function BuildPopup()

   local oPopup
   
   MENU oPopup POPUP 2007
      MENUITEM "One" ACTION MsgInfo( "One" ) FILE "..\bitmaps\16x16\fivetech.bmp"
      MENUITEM "Two" ACTION MsgInfo( "Two" ) FILE "..\bitmaps\16x16\fivetech.bmp"
      SEPARATOR
      MENUITEM "Three" ACTION MsgInfo( "Three" ) FILE "..\bitmaps\16x16\fivetech.bmp"
   ENDMENU
   
return oPopup
Fivewin-Xharbour 24.09, Iquique, Chile
Posts: 336
Joined: Wed May 16, 2007 09:40 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 12:12 AM

Porque Insisto tanto con el MANIFEST, porque al sacarlo no sucede nada y necesito colocarlo para rendodear las cajas y mejorar el aspecto de las pantallas

ahh yo uso *.RES sera una de las causas

Fivewin-Xharbour 24.09, Iquique, Chile
Posts: 336
Joined: Wed May 16, 2007 09:40 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 12:14 AM

aca esta el ejecutable que cree con el programa de arriba

http://www.megaupload.com/?d=L17EVNGQ

te podras dar cuenta que la primera ventana no tiene problema, al presionar ese boton y entrar en la segunda presiona el tabulador como primera tecla y veras que desaparece el bitmap del boton

Fivewin-Xharbour 24.09, Iquique, Chile
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 12:40 AM
En el ejecutable que pusiste no aparece el bitmap en ningu dialogo... puede que existe un problema de path con la imagen

de todas probe el ejemplo arriba expuesto ( que no es igual al EXE que publicaste ) y funciona perfectamente

puede que sea la version de fivewin que usas.. se han correjido varias cosas con respecto a el tema de los recursos

aqui tienes el ejemplo... copialo dentro de la carpeta samples de fivewin....

http://www.sitasoft.net/fivewin/samples/testrbtn.zip
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 12:44 AM
agrega esto a tu prg principal y prueba

Code (fw): Select all Collapse
function IsAppThemed()
return .F.
Posts: 336
Joined: Wed May 16, 2007 09:40 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 01:18 AM

Hola Daniel

Ya encontre el problema de porque se me comportaba distinto el programa al tuyo, tu defines el boton con la clase TRBTN y yo lo tengo definido como BUTTON dentro del recurso, ahora se me soluciono el problema

Gracias por toda la ayuda y tu tiempo

Fivewin-Xharbour 24.09, Iquique, Chile
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 01:27 AM
Bien...

Por eso en muchas ociaciones te pedi publicaras un ejemplo que podamos construir... ESO ES MUY IMPORTNATE a la hora de solicitar ayuda, te ahorras tiempo y se lo ahorras a los demas, por tratar de reproducir un error en un escenario que solo tu conoces, los usuarios no le prestan atencion a ese punto...

He insistido mucho en ese tipo de cosas y desde haxce bastante tiempo, siempre me veras solicitando ejemplos y lo mas impresionante es que el 90% de los casos se consigue el error haciendo el ejemplo...
te recomiendo leas este post: http://forums.fivetechsupport.com/viewtopic.php?p=103821#p103821
Posts: 336
Joined: Wed May 16, 2007 09:40 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 01:36 AM

Disculpa daniel, lo tendre en cuenta para la proxima, ser mas detallista en mis preguntas y dar la mayor parte de informacion del error o problema

Igualmente Gracias

Fivewin-Xharbour 24.09, Iquique, Chile
Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 01:05 PM

A partir de que version de FWH esta esta clase ?

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 01:08 PM
Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 03:58 PM

Daniel,

Esa es la version k tengo, pero no veo como se puede usar desde recursos. en el archivo de cabecera no esta definida desde recursos

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 04:16 PM

Pablo...

el soporte para los recuros llego para enero del 2010 ( 10.01 )

para esa version no esta disponible

Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Re: RBBTN (SOLUCIONADO)
Posted: Mon Mar 14, 2011 04:22 PM

Pues, a actualizar FWH...

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 205
Joined: Fri Oct 07, 2005 05:07 PM
Re: RBBTN (SOLUCIONADO)
Posted: Fri Apr 06, 2012 05:20 PM

Buenas
Disculpen revivir este tema.
en ese ejemplo que envia Daniel, creo que se tiene un problema con el funcionamiento del RBBTN en el dialogo.

Si se activa el segundo dialog, seleccionamos una opcion del menu del RBBTN, despues hacemos click en el boton 'OK' para salir del dialogo, este no responde, probe en windows 7 e xp.
Es asi su funcionamiento en los dialogos?
Cual es la solucion?

Saludos/regards

RenOmaS



skype: americo.balboa

Continue the discussion