Estimados
Una pregunta sencilla, pero se me ha hecho complicada; 驴como hago para que la ventana principal de la aplicaci贸n no pueda ser cambiada de tama帽o?
Ya evito que se la maximize con el comando NOZOOM al definir la WINDOW; pero no puedo evitar que al tener la secci贸n de mensajes activa por el uso de SET MESSAGE me le cambien el tama帽o con el rat贸n y deseo mantener el tama帽o definido inicialmente.
Saludos
Fernando Espinoza A.
DEFINE WINDOW oWnd FROM 0,0 TO 491,700 PIXEL TITLE "Sistema: FACTURAS" STYLE nOr(WS_SYSMENU,WS_MAXIMIZE,WS_MINIMIZEBOX)Estimado ACuellar
Gracias por la respuesta, no logro el efecto deseado; porque?.
R: Es que al ubicar la barra de mensajes en la parte inferior de la aplicaci贸n con el comando SET MESSAGE (quiero que se vea porque me es 煤til en la aplicaci贸n), este incorpora en el extremo inferior derecho esas rayitas diagonales que permiten cambiar el tama帽o de la ventana con el rat贸n.
Saludos
Fernando Espinoza A.
Fernando,
Revisa FWH/samples/testsize.prg
#include "FiveWin.ch"
//----------------------------------------------------------------------------//
function Main()
local oWnd
DEFINE WINDOW oWnd;// FROM 3, 6 TO 120, 70 ;
TITLE "Welcome to FiveWin" ;
COLOR "W+/B"
@ 2, 2 SAY "Resize me" OF oWnd SIZE 100, 20
oWnd:aMinMaxInfo = { 200, 200,; // xMaxSize, yMaxSize
50, 50,; // xMaxPosition, yMaxPosition
400, 400,; // xMinTrackSize, yMinTrackSize
150, 150 } // xMaxTrackSize, yMaxTrackSize
ACTIVATE WINDOW oWnd MAXIMIZED
return nil
Xevi,
DEFINE WINDOW oWnd STYLE WS_POPUP
revisa fwh/samples/testmov2.prg
Ya, pero eso "quita" los bordes y barra de t铆tulo.
No se puede cerrar la ventana, si no es con Alt+F4
No es el efecto deseado.
Puedes facilmente a帽adirle un bot贸n para cerrarla usando un control TBtnBmp 贸 TButton
function Main()
聽 聽local oWnd
聽 聽DEFINE WINDOW oWnd;// FROM 3, 6 TO 120, 70 ;
聽 聽 聽 TITLE "Welcome to FiveWin" ;
聽 聽 聽 COLOR "W+/B"
聽 聽@ 2, 2 SAY "Resize me" OF oWnd SIZE 100, 20
聽 聽oWnd:aMinMaxInfo = { 200, 200,; 聽// xMaxSize, 聽 聽 聽yMaxSize
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽50, 聽50,; 聽// xMaxPosition, 聽yMaxPosition
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 400, 400,; 聽// xMinTrackSize, yMinTrackSize
聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 150, 150 } 聽// xMaxTrackSize, yMaxTrackSize
聽 聽ACTIVATE WINDOW oWnd MAXIMIZED
return nilfunction Main()
local oWnd
DEFINE WINDOW oWnd;// FROM 3, 6 TO 120, 70 ;
TITLE "Welcome to FiveWin" ;
COLOR "W+/B";
STYLE nOr(WS_SYSMENU)
@ 2, 2 SAY "Resize me" OF oWnd SIZE 100, 20
ACTIVATE WINDOW oWnd// MAXIMIZED
return nilXevi,
Muy bien
Puedes simplificar asi:
... STYLE WS_SYSMENU