DICAS

Visite a biblioteca de dicas da comunidade.

Saiba mais

ARTIGOS

Abordagens detalhadas sobre assuntos diversos.

Saiba mais

INICIANTES

Aprenda a programar de um modo simples e fácil.

Saiba mais

DOWNLOADS

Acesse os materiais exclusivos aos membros.

Saiba mais
voltar

PARA QUEM GOSTA DE DELPHI

Função para obter a data do último dia de um mês passado por parâmetro.

É necessário estar declarado DateUtils na seção uses,
em versões unicode declare System.DateUtils;

Função do Delphi: EndOfAMonth(Ano e Mes);
Retorno: TDateTime

Exemplos de uso

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.Button1Click(Sender: TObject);
var
  vDate : TDateTime;
begin
  vDate := EndOfAMonth(2001, 02);
  ShowMessage(DateToStr(vDate));
 
  vDate := EndOfAMonth(2015, 06);
  ShowMessage(DateToStr(vDate));
 
  vDate := EndOfAMonth(2016, 02);
  ShowMessage(DateToStr(vDate));
end;
Facebook Comments Box
  • InfusTec
  • 3.817 views
  • 1 comentários
  • 28 de março de 2015

Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!

Uma resposta para “Função para obter a data do último dia de um mês passado por parâmetro.”

  1. Messias Ymcmb disse:

    Gostaria de saber se você tem algum exemplo de utilização do componente calendar, preciso fazer um sistema de agendamento, porem não quero utilizar componetes ja prontos quero fazer o meu proprio utilizando apenas este componente calendar.

Deixe um comentário

Ir ao topo

© 2024 Infus Soluções em Tecnologia - Todos os Direitos Reservados