FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Dialogo o Ventana sin titulo y botones minimizar
Posts: 71
Joined: Sat Oct 20, 2007 03:02 PM
Dialogo o Ventana sin titulo y botones minimizar
Posted: Wed Feb 27, 2013 07:20 PM

Hola Buenas Tardes

Tengo una duda, como crear un dialogo o una ventana la cual NO necesito que tenga el titulo, los botones de cerrar o de minimizar que si se puede incluso eliminar el entorno de el dialogo o la ventana

he buscado y no he encontrado nada al respecto, si puede alguien ayudarme le agradezco mucho

Gracias y Saludos a Todos.

Carlos I. De La Rosa

carloslmm10@gmail.com

FWH 12.05 harbour bcc 5.82

Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: Dialogo o Ventana sin titulo y botones minimizar
Posted: Wed Feb 27, 2013 07:33 PM

Hola...
Yo genero los diálogos con el PellesC y lo puedo hacer sin ningún problema poniendo el parámetro caption en "NO"
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 883
Joined: Thu Dec 24, 2009 12:46 AM
Re: Dialogo o Ventana sin titulo y botones minimizar
Posted: Wed Feb 27, 2013 07:35 PM
Creo que lo que buscas lo puedes conseguir añadiendo al Define de la ventana esto:
Code (fw): Select all Collapse
NOSYSMENU STYLE nOr( WS_POPUP )


para que quede algo asi:

Code (fw): Select all Collapse
DEFINE WINDOW oWnd FROM 0, 0 TO 600, 600
        PIXEL;    
        TITLE 'Titulo de la ventana';
        NOSYSMENU; 
        STYLE nOr( WS_POPUP )

=====>

Bayron Landaverry
xBasePHP.com
(215)2226600 Philadelphia,PA, USA
MayaBuilders@gMail.com
Guatemala

FWH25.06--Harbour 3.0.0--BCC7.7--UEstudio 10.10
Windows 10

FiveWin, One line of code and it's done...

Posts: 71
Joined: Sat Oct 20, 2007 03:02 PM
Re: Dialogo o Ventana sin titulo y botones minimizar
Posted: Thu Feb 28, 2013 04:14 PM

Muchas Gracias Compañeros

Lo Voy a Probar

Gracias de nuevo y saludos a todos.

Carlos I. De La Rosa.

carloslmm10@gmail.com

FWH 12.5 harbour

Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Dialogo o Ventana sin titulo y botones minimizar
Posted: Tue Mar 05, 2013 09:50 PM
Buenas noches

El código siguiente no funciona

Code (fw): Select all Collapse
  DEFINE WINDOW oAplica ;
                         FROM 0, 0 TO nAlto, nAncho ;
                         PIXEL;
                         BRUSH oBrushWnd ; 
                         MDI ;//                         MENUINFO 8 ;
                         BORDER NONE ;
                         NOSYSMENU //; 
                         
   oAplica:nStyle    := nOr( WS_POPUP )


al ejecutar me marca el siguiente error:

Code (fw): Select all Collapse
Stack Calls
===========
   Called from:  => __ERRRT_SBASE( 0 )
   Called from: ../../../tobject.prg => NIL:ERROR( 0 )
   Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
   Called from: ../../../tobject.prg => NIL:MSGNOTFOUND( 0 )
   Called from: ../../../tobject.prg => NIL:OWNDCLIENT( 0 )
   Called from: .\source\classes\MDICHILD.PRG => TMDICHILD:NEW( 148 )
   Called from: C:\Proyecto\Apli\comp.prg => HAZWINDOW( 586 )
   Called from: C:\Proyecto\Apli\comp.prg => MAIN( 485 )


Por qué en MDICHILD y no en MDIFRAME?, y
No se puede hacer una ventana MDI sin caption y sin SYSMENU?
Gracias
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 505
Joined: Sat Apr 22, 2006 09:09 AM
Re: Dialogo o Ventana sin titulo y botones minimizar
Posted: Wed Mar 06, 2013 06:54 AM
Hola Carlos:

Yo lo hago de la siguiente manera:

Code (fw): Select all Collapse
DEFINE WINDOW oDlgwBro OF oVentPrinc MDICHILD PIXEL FROM zVer,zHor TO (zVer+zAnc),(zHor+zLar) COLORS escri01, fondo01  STYLE nOr(WS_DLGFRAME)
  SET FONT OF oDlgwBro TO oFont
ACTIVATE WINDOW oDlgwBro NORMAL VALID (if (GetKeyState (VK_ESCAPE), .F.,oDlgwBro:End()))


El VALID es para que no funcione el escape y se cierre.

Espero que te sirva

Carlos
Colt Hop ED, S.L.
Carlos Blas Fernández Domínguez
Tlfo: 645847093
E-Mail: carlos@colthop.es

Nunca se termina de aprender, por eso necesito siempre ayuda.

Continue the discussion