Page 1 of 1
VENTANA QUE NO SE REDIMENCIONE
Posted: Wed May 23, 2012 11:28 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Wed May 23, 2012 11:58 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 2:52 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 3:09 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 3:42 pm
by 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.
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 5:56 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 6:02 pm
by 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
Re: VENTANA QUE NO SE REDIMENCIONE
Posted: Thu May 24, 2012 6:42 pm
by 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