FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)Last update on Thu Jun 04, 2026 12:06 PM UTC
Board index FiveWin para Harbour/xHarbour ¿Cómo quito el "caption" a un diálogo? (SOLUCIONADO)
AngelSalom
Posts: 729
Joined: Fri Oct 07, 2005 07:38 AM

¿Cómo quito el "caption" a un diálogo? (SOLUCIONADO)

Posted: Wed Jun 10, 2015 09:35 AM
Quizás sea un tema básico pero no consigo dar con ello ... cómo quito la barra superior de un diálogo (la franja con el título y los controles de maximizar, minimizar, etc ...)
Aquí el ejemplo que estoy intentando ...

Code (fw): Select all Collapse
#include "FiveWin.ch"

Function Main()

   Local oDlg
 
   DEFINE DIALOG oDlg STYLE nOr(WS_DLGFRAME)

   @ 2, 3 BUTTON "&Salir" SIZE 40, 12 ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

Return (nil)


Gracias

Angel Salom

Visionwin Software - https://www.visionwin.com

fwh 24.07 - harbour 3.2 - bcc 7.7

cnavarro
Posts: 6760
Joined: Wed Feb 15, 2012 08:25 PM

Re: ¿Cómo quito el "caption" a un diálogo?

Posted: Wed Jun 10, 2015 10:05 AM
Intenta asi

Code (fw): Select all Collapse
DEFINE..

SetWindowLong( oDlg:hWnd, -16, "L" )

ACTIVATE ..
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
AngelSalom
Posts: 729
Joined: Fri Oct 07, 2005 07:38 AM

Re: ¿Cómo quito el "caption" a un diálogo?

Posted: Wed Jun 10, 2015 10:12 AM
Gracias cnavarro, pero sigue igual. Aquí el ejemplo con tu sugerencia :

Code (fw): Select all Collapse
#include "FiveWin.ch"

Function Main()

   Local oDlg
 
   DEFINE DIALOG oDlg 

   @ 2, 3 BUTTON "&Salir" SIZE 40, 12 ACTION oDlg:End()

   SetWindowLong( oDlg:hWnd, -16, "L" )
   
   ACTIVATE DIALOG oDlg CENTERED

Return (nil)

Angel Salom

Visionwin Software - https://www.visionwin.com

fwh 24.07 - harbour 3.2 - bcc 7.7

cnavarro
Posts: 6760
Joined: Wed Feb 15, 2012 08:25 PM

Re: ¿Cómo quito el "caption" a un diálogo?

Posted: Wed Jun 10, 2015 10:21 AM
Y asi?

Code (fw): Select all Collapse
DEFINE DIALOG oDlg           STYLE nOr( WS_CHILD, WS_POPUP )
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
AngelSalom
Posts: 729
Joined: Fri Oct 07, 2005 07:38 AM

Re: ¿Cómo quito el "caption" a un diálogo?

Posted: Wed Jun 10, 2015 10:31 AM
Ahora perfecto ... la verdad es que no acabo de entender el concepto del STYLE, pero tal y como indicas es justo lo que necesitaba.
Gracias!!

Así quedó :

Code (fw): Select all Collapse
#include "FiveWin.ch"

Function Main()

   Local oDlg
 
   DEFINE DIALOG oDlg           STYLE nOr( WS_CHILD, WS_POPUP )

   @ 2, 3 BUTTON "&Salir" SIZE 40, 12 ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

Return (nil)

Angel Salom

Visionwin Software - https://www.visionwin.com

fwh 24.07 - harbour 3.2 - bcc 7.7

cnavarro
Posts: 6760
Joined: Wed Feb 15, 2012 08:25 PM

Re: ¿Cómo quito el "caption" a un diálogo?

Posted: Wed Jun 10, 2015 10:36 AM
Asi es suficiente

Code (fw): Select all Collapse
DEFINE DIALOG oDlg  STYLE  WS_POPUP
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

Continue the discussion

Static archive · New replies & topics via GitHub Discussions