TOTVSTEC

Árvore de páginas

Cria um objeto de evento de Calendário. Esta é uma classe de apoio para as funções de calendário da classe TMobile (addCalendarEvent, findCalendarEvent, getCalendarEvent e viewCalendarEvent).

Hierarquia

Construtores

Propriedades

Métodos

Exemplos

 #include "TOTVS.CH"
  User Function TCalEv()
    aCalend := TCalendarEvent():New("titulo","descricao","rua teste",Date()+15,"06:00:00",Date()+15,"07:00:00",.T.)
    cvartoshow := 'Title       - ' + aCalend:ctitle + CRLF
    cvartoshow += 'Description - ' + aCalend:cdescription + CRLF
    cvartoshow += 'Location    - ' + aCalend:clocation + CRLF
    cvartoshow += 'DStart      - ' + cvaltochar(aCalend:dStartDate) + CRLF
    cvartoshow += 'DEnd        - ' + cvaltochar(aCalend:dEndDate) + CRLF
    cvartoshow += 'HStart      - ' + aCalend:cStartTime + CRLF
    cvartoshow += 'HEnd        - ' + aCalend:cEndTime + CRLF
    cvartoshow += 'allDay      - ' + cvaltochar(aCalend:bAllDay) + CRLF
    msginfo(cvartoshow)
  Return

Resultado do Exemplo

  • Sem rótulos