Barras de título ocupando espaço?

Precisando ganhar alguns centímetros de tela? Usando as propriedades WS_VISIBLE e WS_POPUP, neste caso, é possível remover a barra de títulos em janelas. Veja os exemplos:

define msdialog oDialog title "Sem barra de titulo" from 0,0 to 800,100 pixel style nOR( WS_VISIBLE, WS_POPUP )
oDialog:lMaximized := .t.  // maximiza janela.


* No construtor construtor MsDialog:New, use deste modo:

oDialog := msdialog():new(0,0,800, 1000,"Sem barra de titulo",,,,nOr(WS_VISIBLE,WS_POPUP),CLR_BLACK,CLR_WHITE,,,.t.,,,,.t.)
oDialog:lMaximized := .t.  // maximiza janela.


* No construtor TDialog:New, use deste modo:

oDialog := tdialog():New(0,0,800,1000,"Sem barra de titulo",,,,nOr(WS_VISIBLE,WS_POPUP),CLR_BLACK,CLR_WHITE,,,.t.,,,,,,.f.)
oDialog:lMaximized := .t.  // maximiza janela.