Inhibir el redimensionado de una ventana

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

Inhibir el redimensionado de una ventana
Posted: Thu Jul 05, 2007 11:43 PM

Hola gente
Se puede?. Lo que pretendo es que no se redimensione mediante el mouse (lo que normalmente se usa). La ventana es Main

muchas gracias
Saludos

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Inhibir el redimensionado de una ventana
Posted: Fri Jul 06, 2007 03:24 AM

Mario,

Revisa samples\TestSize.prg

regards, saludos

Antonio Linares
www.fivetechsoft.com

Francisco Horta

Posts: 845

Joined: Sun Oct 09, 2005 05:36 PM

Inhibir el redimensionado de una ventana
Posted: Fri Jul 06, 2007 05:21 AM

MarioG,
si tienes un dialogo desde recurso, con el editor de recursos en el window style pon el THICKFRAME en NO y con eso
salu2
paco

____________________

Paco

MarioG

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

Inhibir el redimensionado de una ventana
Posted: Fri Jul 06, 2007 01:52 PM

gracias Antonio, lo haré
Francisco, es un DEFINE WINDOW... (gracias igualmente)

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Inhibir el redimensionado de una ventana
Posted: Sat Jul 07, 2007 05:48 AM

Hola, yo lo hago asi: ( observa el ON RESIZE)

ACTIVATE DIALOG oDlg CENTER NOWAIT ;
ON INIT ( oDlg:Move( 0, 0 ), oLbx:GoTop()) ;
VALID (oWndK:End(), lSalir )
oWndK:bGotFocus = { || oDlg:SetFocus() }
ACTIVATE WINDOW oWndK ;
ON INIT (oWndK:Move(0,0), oWndK:SetSize( oDlg:nWidth, oDlg:nHeight ) ) ; // MAXIMIZED ;
ON RESIZE (oWndK:SetSize( oDlg:nWidth, oDlg:nHeight ) ) ;
VALID (oApp:aVentana[2]:=.f.,tActual:End(), lSalir)

Salu2

MarioG

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

Inhibir el redimensionado de una ventana
Posted: Sat Jul 07, 2007 12:46 PM

Gracias Willy
Lo voy a probar, para tener una opcion más. Ya que la que me recomendó Antonio tambien funciona...y como no, viniendo del Jefe :-)

Code: Select all Collapse

testsize.prg
   oWnd:aMinMaxInfo = { 200, 200, ;  // xMaxSize,      yMaxSize
                        50,  50,;      // xMaxPosition,  yMaxPosition
                        80,  80,;      // xMinTrackSize, yMinTrackSize
                        150, 150 }   // xMaxTrackSize, yMaxTrackSize

yo lo hice así

Code: Select all Collapse

   oWnd:aMinMaxInfo = { WND_MAX, WND_HEIGHT, ;  // xMaxSize,      yMaxSize
                        50,  50,;               // xMaxPosition,  yMaxPosition
                        80,  80,;               // xMinTrackSize, yMinTrackSize
                        WND_MAX, WND_HEIGHT }   // xMaxTrackSize, yMaxTrackSize

obviamente los WND_ son valores numericos #define
Acá voy a apelar a que Antonio me aclare sobre mi ignorancia; ya que primero solo reemplacé los valores de xMaxSize e yMaxSize y el tamaño no se ajsutaba como pretendía. Luego, reemplacé en xMaxTrackSize e yMax... y obtuve lo deseado
O sea el último par de valores a que o como afectan?

nuevamente gracias a todos
saludos

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

FiveTech Support Forums

Continue the discussion