Inhibir el redimensionado de una ventana

Inhibir el redimensionado de una ventana

Postby MarioG » 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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Postby Antonio Linares » Fri Jul 06, 2007 3:24 am

Mario,

Revisa samples\TestSize.prg
regards, saludos

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

Postby Francisco Horta » Fri Jul 06, 2007 5: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
Francisco Horta
 
Posts: 845
Joined: Sun Oct 09, 2005 5:36 pm
Location: la laguna, mexico.

Postby MarioG » Fri Jul 06, 2007 1:52 pm

gracias Antonio, lo haré
Francisco, es un DEFINE WINDOW... (gracias igualmente)
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Postby Willi Quintana » Sat Jul 07, 2007 5: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
User avatar
Willi Quintana
 
Posts: 1004
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby MarioG » 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  Expand view
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  Expand view
   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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 126 guests