Osmar J. Silva

Ofereço ajuda em Java, C/C++, Python, C#, LISP, AutoLisp, AutoCAD

+55 (062) 98553-6711

José de Angelis

Ofereço ajuda em PHP, Python, C#, JavaScript, Laravel, Google Ads e SEO

+55 (062) 98243-1195

Você está aqui: Delphi ::: Dicas & Truques ::: Data e Hora

Como testar se um determinado ano é bissexto usando Delphi

Quantidade de visualizações: 13868 vezes

Em algumas situações precisamos verificar se um determinado ano é bissexto. Em Delphi isso pode ser feito com o auxílio da função IsLeapYear(), disponível na unit SysUtils. Esta função aceita um valor inteiro representando o ano que queremos testar e retorna um valor true se o ano for bissexto e false em caso contrário.

Veja um trecho de código no qual testamos se o ano 2008 é bissexto:

procedure TForm1.Button1Click(Sender: TObject);
var
  ano: integer;
begin
  // define o ano
  ano := 2008;

  // vamos verificar se este ano é bissexto
  if IsLeapYear(ano) then
    ShowMessage('O ano ' + IntToStr(ano) + ' é bissexto')

+ Ver Código Completo - Exclusivo para Apoiadores - R$ 9,90 (3 meses de acesso)

Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009.

Link para compartilhar na Internet ou com seus amigos:

Desafios, Exercícios e Algoritmos Resolvidos de Delphi

Como calcular média ponderada em Delphi - Ler o nome de um aluno e as notas de três provas - Exercícios Resolvidos de Delphi

Um programa Delphi que lê dois números e mostra a soma, subtração, multiplicação e a divisão dos números lidos - Exercício Resolvido de Delphi

Ler uma temperatura em graus Celsius e apresentá-la convertida em graus Fahrenheit - Exercício Resolvido de Delphi

Veja mais Dicas e truques de Delphi

Como obter a quantidade de campos nos registros retornados em um TSQLDataSet do Delphi usando a propriedade FieldCount

Como usar o controle TListBox em suas aplicações Delphi

Como arredondar casas decimais para baixo usando a função Floor() do Delphi

Como calcular o coeficiente angular de uma reta em Delphi dados dois pontos no plano cartesiano

Como retornar o índice do item selecionado em um ComboBox do Delphi usando a propriedade ItemIndex

Como ler todo o conteúdo de um arquivo texto usando Delphi - As funções AssignFile(), ReadLn() e Eof() do Delphi

Como converter um valor inteiro em um caractere usando a função Chr() do Delphi

Como centralizar os títulos das colunas (ou o conteúdo de qualquer célula) de um TStringGrid do Delphi

Formatando datas e horas em Delphi usando a função FormatDateTime()

Como formar um WORD a partir de dois BYTE

Dicas e truques de outras linguagens

Java - Exercícios Resolvidos de Java - Um programa que lê dois números inteiros e mostra o menor

Python - Como usar os argumentos padrões das funções em Python

Python - Como exibir um botão em uma janela wx.Frame do wxPython, detectar um clique no botão e exibir uma caixa de mensagem wx.MessageDialog

Laravel - Como criar um CRUD completo em Laravel 8 - CRUD em Laravel usando PHP e MySQL (MariaDB) - Parte 1

Java - Como aplicar uma borda colorida a uma célula da JTable do Java Swing ao passar o mouse

Ruby - Como retornar os minutos em Ruby a partir de um objeto da classe Time usando a função min

Python - Como exibir a data atual em Python de acordo com as configurações regionais usando as funções strftime() e setlocale()

Python - Aprenda a programar em Python - Como criar suas próprias funções em Python

Ruby - Como criar funções em Ruby - Como criar e usar funções na linguagem Ruby

PHP - Como usar funções e variáveis globais em PHP

E-Books em PDF

E-Book 350 Exercícios Resolvidos de Java - PDF com 500 páginas

Domine lógica de programação e a linguagem Java com o nosso E-Book 350 Exercícios Exercícios de Java, para você estudar onde e quando quiser.

Este e-book contém exercícios resolvidos abrangendo os tópicos: Java básico, matemática e estatística, programação dinâmica, strings e caracteres, entrada e saída, estruturas condicionais, vetores e matrizes, funções, laços, recursividade, internet, arquivos e diretórios, programação orientada a objetos e muito mais.

Ver Conteúdo do E-book

E-Book 650 Dicas, Truques e Exercícios Resolvidos de Python - PDF com 1.200 páginas

Domine lógica de programação e a linguagem Python com o nosso E-Book 650 Dicas, Truques e Exercícios Exercícios de Python, para você estudar onde e quando quiser.

Este e-book contém dicas, truques e exercícios resolvidos abrangendo os tópicos: Python básico, matemática e estatística, banco de dados, programação dinâmica, strings e caracteres, entrada e saída, estruturas condicionais, vetores e matrizes, funções, laços, recursividade, internet, arquivos e diretórios, programação orientada a objetos e muito mais.

Ver Conteúdo do E-book

Linguagens Mais Populares

1º lugar: Java
2º lugar: Python
3º lugar: C#
4º lugar: PHP
5º lugar: C
6º lugar: Delphi
7º lugar: JavaScript
8º lugar: C++
9º lugar: VB.NET
10º lugar: Ruby

Você está aqui: Delphi ::: Dicas & Truques ::: Data e Hora

Como testar se um determinado ano é bissexto usando Delphi

Questões de Concurso para Engenharia Civil

Exercícios Resolvidos

Bancos de Dados

Questões de Concurso

Frameworks

Projetos e Códigos Fonte

Especializações

Calculadoras

Ferramentas

Todas as Linguagens, Frameworks, Biliotecas e Bancos de Dados

Compre pelo WhatsApp: +55 (062) 98553-6711

E-Book 350 Exercícios Resolvidos de Java - Com comentários em Português

PDF COM 500 PÁGINAS

Apenas R$ 19,90