VENTANA QUE NO SE REDIMENCIONE

[FRANCISDAX]

Hola a todos

Hay alguna manera de que una ventana mdi no se pueda redimencionar

Code: Select all

  DEFINE WINDOW oWChild;
         TITLE OToA( "Gesti¢n de Centros de Costo" );
         MDICHILD;
         ICON oIcon;
         NOMINIMIZE;
         NOZOOM;
         OF oVentana
 

Con este codigo ya nos se puede agrandar ni minimizar, pero si se puede redimencionar con el mouse en los bordes....

Salu2

[jll-fwh]

Hola FrancisDax:

Code: Select all

   DEFINE WINDOW oWndPClie MDICHILD OF oWndChild                ;
          FROM 0,0 TO 40, 80 PIXEL                   ;
          COLOR nRGB( 232,236,240 ),nRGB( 232,236,240 )         ;
          TITLE "Bandeja de entrada - Entrada de datos de pMail";
          NOSYSMENU

   ACTIVATE WINDOW oWndPClie MAXIMIZED   
 

Aquí te dejo dos imágenes de 2 programas distintos usando esta Declaración.




Espero que te sirva;
Un saludo
JLL

[MarioG]

JLL (este es un O.T. del tema)
Tus ventanas se ven muy profesionales, felicitaciones
Al mirar la descripcion de los botones, de la ventana de pMail, leo: Marcar/Demarcar
no debería decir Marcar/Desmarcar ?
Creo entender que Demarcar quiere decir: establecer una linea o área de marcación

Saludos

[Willi Quintana]

Retomando la pregunta inicial,,,, para que la mdi no se redimencione y este siempre del tamaño del dialog interno, yo lo hago asi:

Code: Select all

...
..
.
ACTIVATE DIALOG oDlg CENTER NOWAIT ;
                ON INIT (oDlg:Move( 0, 0 ), ;
                VALID  (oWndC:End(), lSalir )
                oWndC:bGotFocus  = { || oDlg:SetFocus() }
ACTIVATE WINDOW oWndC ;
         ON INIT (oWndC:Move(0,0), oWndC:SetSize( oDlg:nWidth, oDlg:nHeight ) ) ;      // aqui la mdi toma el tamaño del dialogo
         ON RESIZE (oWndC:SetSize( oDlg:nWidth, oDlg:nHeight ) ) ;                               // aqui evitamos el redimensionamiento....
         VALID ( lSalir )
 

Salu2

[lucasdebeltran]

Javier,

Muy bonitos tus diálogos.

Yo usaría en la contabilidad también la ribbon 2010 y para los ingresos usaría verde y gastos el rojo.

Gracias por ayudar y compartir tu conocimiento.

[jll-fwh]

Hola Mario:

El programa pMail esta por finalizar por falta de tiempo, normalmente hasta que no lo acabo no suelo mirar las faltas de ortografia en los textos porque suelo cambiar mucho de opinión hasta dar con los textos adecuados, posiblemente tenga algo mas por ahi.

De todas formas, muchas gracias por tu apreciación porque hasta ahora ni lo había visto. Lo tenia generado con los menus de siempre, pero ahora he cambiado de opinión para insertar menus RibbonBar y de esta forma, generarme una clase para este fin, aunque todavía me falta currarmelo un poco mas para que se parezca lo mas posible a Outlook 2010.

Como tengo varios programas por terminar, voy poco a poco modificando el pMail, a ver si la semana que viene tengo tiempo y lo acabo en un par de días. Publicare el programa con licencia GPL y los fuentes a un precio módico por si a alguien le interesan.

Gestiona POP3 y SMTP.

P.D. Me alegro que los diseños gusten, es algo que le doy muchas horas hasta encontrar algo profesional, aunque suelo tener un diseño predefinido intento crear algo diferente. Soy de los que pienso que la vista vende.

Un saludo
JLL

[jll-fwh]

Hola Lucas:

Muchas gracias.

En el programa de contabilidad, uso los colores solo en _ numéricos ya que en mi opinión resaltar todas las filas en color es mas molesto que útil. En los listado doy la opción también poder imprimir en color o no.

Sobre los menus Ribbonbar en contabildiad, por falta de tiempo de momento lo dejare como esta, en próximas versiones ya le cambiare el aspecto un poco, pero por supuesto quedaría mucho mas profesional con Ribbonbar, sin duda.

De nuevo, gracias por vuestro interés sobre mis programas, eso anima a seguir en la misma linea.

Gracias;

Un saludo
JLL

[acuellar]

Francis

Intenta asi:

Code: Select all

 DEFINE WINDOW oWnd FROM 0,0 TO 490,710 PIXEL TITLE "Sistema: " STYLE nOr(WS_SYSMENU,WS_MAXIMIZE,WS_MINIMIZEBOX);
   COLOR  CLR_BLUE, nRGB( 182,192,192 ) MENU CreaMenu() 
 

Saludos,

Adhemar