Remover barra branca em FwCalendar

Boa tarde!

Gostaria de saber se alguém já usou o framework FwCalendar e se sim, se sabe remover a barra branca que é criada em baixo do calendário com os dias.

Queria remover esse espaço de modo que o calendário ocupe melhor a tela.

Segue exemplo do código e da tela:

    Local _aSize         :=    {} 
    Local _aObjects        :=    {}
    Local _aInfo        :=    {}
    Local _aPosObj        :=    {}

    Local _aButtons    :=    {}

    Private _oCalend
    Private _oDlg

    aAdd(_aButtons,{"HISTORIC",{|| NextMes()}, "Avança Mês","Avança Mês"})
    aAdd(_aButtons,{"HISTORIC",{|| PrevMes()}, "Retorna Mês","Retorna Mês"})
    aAdd(_aButtons,{"HISTORIC",{|| AtuMes()}, "Mes Atual","Mês Atual"})
//    aAdd(_aButtons,{"HISTORIC",{|| AddCCli()}, "Adiciona Cliente","Adiciona Cliente"})
//    aAdd(_aButtons,{"HISTORIC",{|| DelCCli()}, "Remove Cliente","Remove Cliente"})    


    _aSize := MsAdvSize(.F.)                      

    AAdd(_aObjects, {100, 100, .T. , .T. })

    _aInfo   := {_aSize[1], _aSize[2], _aSize[3], _aSize[4], 5, 5}    

    _aPosObj := MsObjSize(_aInfo, _aObjects, .T. )

    Define MsDialog _oDlg Title "Agendamento" From _aSize[7],0 To _aSize[6],_aSize[5] Of oMainWnd Pixel    

        _oCalend := FWCalendar():New(Month(dDataBase), Year(dDataBase))
        _oCalend:lWeekColumn := .F.
        _oCalend:lFooterLine := .F.

        _oCalend:bldblclick    :=    {|| BrwDbClk()}

        _oCalend:Activate(_oDlg)

        CrgCCli()

        _oDlg:ctitle    :=    "Calendário " + _oCalend:cMesano



    Activate MsDialog _oDlg Centered

Grato pela atenção.

fwcalendar.PNG

compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl fwcalendar ou faça a sua própria pergunta.