error en MsgGet

error en MsgGet

Postby MOISES » Fri Sep 07, 2007 11:53 am

Antonio:

Hay varios errores en msgget:

a) El espacio Ref A, que es por si se especifica un bitmap, debería eliminarse cuando NO se especifica, para que quede centrado.

b) El espacio Ref B es muy pequeño. El márgen izquierdo debería ser igual al margen derecho cuando NO hay bitmap.

c) El espacio inferior es también pequeño.

En definitiva, redimensionar bien el diálogo.

d) Los botones se muestran en inglés. Deberían mostrarse en el mismo idioma que el sistema operativo, como sucede con msgstop, msgalert, etc.

Muchas gracias.
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Postby MOISES » Fri Sep 07, 2007 11:53 am

Image
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Postby Antonio Linares » Sun Sep 16, 2007 8:20 am

Moises,

Aqui lo tienes con las dimensiones correctas. Faltan solo los textos en el idioma propio:
Code: Select all  Expand view
#include "FiveWin.ch"

//----------------------------------------------------------------------------//

function MsgGet( cTitle, cText, uVar, cBmpFile, cResName)

   local oDlg, oBmp
   local uTemp := uVar
   local lOk   := .f.

   DEFAULT cText := ""

   DEFINE DIALOG oDlg FROM 10, 20 TO 18, 59.5 TITLE cTitle

   if ! Empty( cBmpFile ) .or. ! Empty( cResName )
      if ! Empty( cBmpFile )
         @ 1, 1 BITMAP oBmp FILENAME cBmpFile SIZE 20, 20 NO BORDER OF oDlg
      endif

      if ! Empty( cResName )
         @ 1, 1 BITMAP oBmp RESOURCE cResName SIZE 20, 20 NO BORDER OF oDlg
      endif

      @ 0.5, 6 SAY cText OF oDlg SIZE 250, 10
      @ 1.6, 4 GET uTemp SIZE 120, 12 OF oDlg
   else   
      @ 0.5, 3.3 SAY cText OF oDlg SIZE 250, 10
      @ 1.6, 2.3 GET uTemp SIZE 120, 12 OF oDlg
   endif   

   @ 2.25, 7.5 - If( oBmp == nil, 2, 0 ) BUTTON "&Ok"  OF oDlg SIZE 35, 12 ;
      ACTION ( oDlg:End(), lOk := .t. ) DEFAULT

   @ 2.25, 16.5 - If( oBmp == nil, 2, 0 ) BUTTON "&Cancel" OF oDlg SIZE 35, 12 ;
      ACTION ( oDlg:End(), lOk := .f. )

   ACTIVATE DIALOG oDlg CENTERED

   if lOk
      uVar := uTemp
   endif

return lOk

//----------------------------------------------------------------------------//
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41208
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby MOISES » Fri Nov 16, 2007 12:02 pm

Antonio,

Sigue pendiente que los botones se muestran en inglés. Deberían mostrarse en el mismo idioma que el sistema operativo, como sucede con msgstop, msgalert, etc.

Muchas gracias!!.
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Postby MOISES » Tue Nov 20, 2007 8:58 am

Antonio:

¿Lo podrás incluir en el build de diciembre?. Muchas gracias. ;)

Un saludo,
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Postby Antonio Linares » Tue Nov 20, 2007 9:40 am

Moises,

De momento la solución es que modifiques el código fuente de MsgGet() y que pongas el texto en español
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41208
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby MOISES » Tue Nov 20, 2007 11:27 am

Antonio,

Ya claro, pero me parece una solución chapucera, ¿no crees?. En fin, creo que es una cosa que debe solucionarse, no entiendo el comportamiento distinto de esta función frente a msgalert, msgabout,etc.

Otra cosilla, ¿cómo va el tema del error de impresión que te comenté?. Eso es más urgente y priotirario.

Un saludo
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am

Postby Antonio Linares » Tue Nov 20, 2007 12:22 pm

Moisés,

>
Ya claro, pero me parece una solución chapucera, ¿no crees?. En fin, creo que es una cosa que debe solucionarse, no entiendo el comportamiento distinto de esta función frente a msgalert, msgabout,etc.
>

MsgAlert(), etc. son funciones propias de Windows, y Windows usa el lenguaje instalado en el ordenador. MsgGet() no es de Windows, es propia de FW, y aún no hemos encontrado en donde se guarda el "aceptar", "cancelar" en Windows. De todas formas, si tu aplicación sólo se va a usar en español, que importa modificar el código de MsgGet() ?

>
Otra cosilla, ¿cómo va el tema del error de impresión que te comenté?. Eso es más urgente y priotirario.
>

A que error te refieres ? Por favor proporcioname el enlace al mensaje en donde lo hayas publicado, gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41208
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby MOISES » Tue Nov 20, 2007 12:50 pm

Antonio:

Muchas gracias por tu pronta respuesta.

Si, claro, tengo modificado el Código fuente, lo que sucede es que prefiero evitar modifcar las clases de fivewin, porque luego con las actualizaciones es un follón, pero vamos, que el tema NO es urgente.

En cuanto al segundo error, que si es imprtante, el link es http://fivetechsoft.com/forums/viewtopic.php?t=8801

Un saludo
MOISES
 
Posts: 838
Joined: Wed Aug 22, 2007 10:09 am


Return to Bugs report & fixes / Informe de errores y arreglos

Who is online

Users browsing this forum: No registered users and 3 guests