4 Tipos de Dados Primitivos do Delphi

Nesse post iremos conhecer alguns dos tipos de dados primitivos do Delphi que são mais utilizados.

Macacos e humanos em fila, mostrando a evolução do primitivo aos dias atuais.

 

Índice

• Introdução
• Explorando os Tipos de Dados Primitivos em Delphi
  • O que são Tipos de Dados Primitivos do Delphi?
  • Tipos de Dados Primitivos em Delphi
    • Inteiros
    • Reais
    • Caracteres e Strings
    • Booleanos
  • Exemplo Prático
    • Passo a Passo para Criar o Projeto
    • Código fonte do exemplo
• Conclusão

Introdução

Nesse post iremos conhecer alguns dos tipos de dados primitivos do Delphi que são mais utilizados.

Os tipos de dados são fundamentais em qualquer linguagem de programação, e Delphi não é exceção. Eles definem a natureza dos dados que podem ser armazenados e manipulados no seu programa. Vamos explorar os tipos de dados mais comuns em Delphi, acompanhados de exemplos práticos para ajudar você a entender como usá-los.

Explorando os Tipos de Dados Primitivos em Delphi

Delphi é uma linguagem de programação poderosa e flexível, que oferece uma variedade de tipos de dados primitivos para facilitar o desenvolvimento de software. Entender esses tipos de dados é essencial para escrever código eficiente e eficaz. Vamos dar uma olhada nos principais tipos de dados primitivos em Delphi de uma forma simples e direta.

O que são Tipos de Dados Primitivos do Delphi?

Os tipos de dados primitivos são os blocos de construção fundamentais para manipular dados em qualquer linguagem de programação. Em Delphi, esses tipos incluem números inteiros, números reais, caracteres, strings e booleanos. Eles são chamados de "primitivos" porque são os tipos de dados básicos e não são compostos de outros tipos de dados.

Tipos de Dados Primitivos em Delphi

1. Inteiros
2. Reais
3. Caracteres e Strings
4. Booleanos

Inteiros

Os inteiros são números sem casas decimais. Em Delphi, há vários tipos de inteiros, cada um com um tamanho e um intervalo diferentes. Aqui estão os mais comuns:

• Integer: Um número inteiro de 32 bits.
• ShortInt: Um número inteiro de 8 bits.
• SmallInt: Um número inteiro de 16 bits.
• LongInt: Um número inteiro de 32 bits (sinônimo de Integer).
• Int64: Um número inteiro de 64 bits.

Exemplo:

Delphi

procedure IntegerExample;
var
  I: Integer;
  SI: ShortInt;
  SMI: SmallInt;
  LI: LongInt;
  I64: Int64;
begin
  I := 1234;
  SI := 127;
  SMI := 32767;
  LI := 2147483647;
  I64 := 9223372036854775807;

  ShowMessage('Integer: ' + IntToStr(I) + sLineBreak +
              'ShortInt: ' + IntToStr(SI) + sLineBreak +
              'SmallInt: ' + IntToStr(SMI) + sLineBreak +
              'LongInt: ' + IntToStr(LI) + sLineBreak +
              'Int64: ' + IntToStr(I64));
end;
  

Reais

Os tipos de dados reais representam números com ponto flutuante, ou seja, casas decimais:

• Single: Precisão simples, 4 bytes.
• Double: Precisão dupla, 8 bytes.
• Extended: Precisão estendida, 10 bytes (depende da plataforma).
• Currency: Tipo especial para valores monetários, com quatro casas decimais fixas.

Exemplo:

Delphi

procedure RealExample;
var
  S: Single;
  D: Double;
  E: Extended;
  C: Currency;
begin
  S := 1234.56;
  D := 1234.56789;
  E := 123456.78912345;
  C := 123456.7891;

  ShowMessage('Single: ' + FloatToStr(S) + sLineBreak +
              'Double: ' + FloatToStr(D) + sLineBreak +
              'Extended: ' + FloatToStr(E) + sLineBreak +
              'Currency: ' + CurrToStr(C));
end;
  

Caracteres e Strings

Os caracteres e strings são usados para armazenar texto.

• Char: Um único caractere.
• String: Uma sequência de caracteres de tamanho variável.
• AnsiString: String com caracteres ANSI.
• WideString: String com caracteres Unicode de 16 bits.
• UnicodeString: String com caracteres Unicode (Delphi 2009+).

Exemplo:

Delphi

procedure StringExample;
var
  C: Char;
  S: String;
  AnS: AnsiString;
  WS: WideString;
  US: UnicodeString;
begin
  C := 'A';
  S := 'Olá, Delphi!';
  AnS := 'Ansi String Example';
  WS := 'Wide String Example';
  US := 'Unicode String Example';

  ShowMessage('Char: ' + C + sLineBreak +
              'String: ' + S + sLineBreak +
              'AnsiString: ' + String(AnS) + sLineBreak +
              'WideString: ' + String(WS) + sLineBreak +
              'UnicodeString: ' + US);
end;
  

Booleanos

Delphi também oferece tipos booleanos para representar valores verdadeiros e falsos.

• Boolean: Pode ter os valores True ou False.

Exemplo:

Delphi

procedure BooleanExample;
var
  B: Boolean;
begin
  B := True;
  if B then
    ShowMessage('Boolean is True')
  else
    ShowMessage('Boolean is False');
end;
  

Exemplo Prático

O código a seguir cria um aplicativo Delphi simples com quatro botões, cada um demonstrando o uso de diferentes tipos de dados. Veja como configurar e executar este exemplo:

Passo a Passo para Criar o Projeto

1. Abra o Delphi e crie um novo projeto:
   • Vá para File -> New -> VCL Forms Application - Delphi.
2. Adicione quatro botões ao formulário:
   • Arraste quatro componentes Button da Tool Palette e solte-os no formulário. Nomeie-os apropriadamente (por exemplo, Button1, Button2, etc.).
3. Configure os eventos OnClick para cada botão:
   • Clique duas vezes em cada botão para abrir o editor de código e criar o evento OnClick.
4. Adicione o código a seguir ao formulário

Delphi

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Button4: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
  private
    { Private declarations }
    procedure IntegerExample;
    procedure RealExample;
    procedure StringExample;
    procedure BooleanExample;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Exemplo de uso de variáveis do tipo inteiro
  IntegerExample;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  // Exemplo de uso de variáveis do tipo real
  RealExample;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  // Exemplo de uso de variáveis do tipo texto
  StringExample;
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
  // Exemplo de uso de variáveis do tipo booleano
  BooleanExample;
end;

procedure TForm1.IntegerExample;
var
  I: Integer;
  SI: ShortInt;
  SMI: SmallInt;
  LI: LongInt;
  I64: Int64;
begin
  I := 1234;
  SI := 127;
  SMI := 32767;
  LI := 2147483647;
  I64 := 9223372036854775807;

  ShowMessage('Integer: ' + IntToStr(I) + sLineBreak +
              'ShortInt: ' + IntToStr(SI) + sLineBreak +
              'SmallInt: ' + IntToStr(SMI) + sLineBreak +
              'LongInt: ' + IntToStr(LI) + sLineBreak +
              'Int64: ' + IntToStr(I64));
end;

procedure TForm1.RealExample;
var
  S: Single;
  D: Double;
  E: Extended;
  C: Currency;
begin
  S := 1234.56;
  D := 1234.56789;
  E := 123456.78912345;
  C := 123456.7891;

  ShowMessage('Single: ' + FloatToStr(S) + sLineBreak +
              'Double: ' + FloatToStr(D) + sLineBreak +
              'Extended: ' + FloatToStr(E) + sLineBreak +
              'Currency: ' + CurrToStr(C));
end;

procedure TForm1.StringExample;
var
  C: Char;
  S: String;
  AnS: AnsiString;
  WS: WideString;
  US: UnicodeString;
begin
  C := 'A';
  S := 'Olá, Delphi!';
  AnS := 'Ansi String Example';
  WS := 'Wide String Example';
  US := 'Unicode String Example';

  ShowMessage('Char: ' + C + sLineBreak +
              'String: ' + S + sLineBreak +
              'AnsiString: ' + String(AnS) + sLineBreak +
              'WideString: ' + String(WS) + sLineBreak +
              'UnicodeString: ' + US);
end;

procedure TForm1.BooleanExample;
var
  B: Boolean;
begin
  B := True;
  if B then
    ShowMessage('Boolean is True')
  else
    ShowMessage('Boolean is False');
end;

end.
  

Código fonte do exemplo

Você pode fazer o download do exemplo do projeto através do repositório do github:

https://github.com/Gisele-de-Melo/TipoPrimitivo

Conclusão

Neste post, exploramos alguns dos principais tipos de dados em Delphi através de exemplos práticos. Entender os tipos de dados primitivos em Delphi é fundamental para qualquer desenvolvedor. Eles são a base para manipulação de dados e construção de lógica em seus programas. Ao entender como utilizar inteiros, reais, strings e booleanos, você estará bem equipado para desenvolver aplicativos robustos e eficientes com Delphi. Experimente criar seus próprios exemplos e explorar outros tipos de dados para aprofundar seu conhecimento e habilidades na linguagem Delphi.

Posts Relacionados

Sintaxe básica - Delphi

Hello, World! O Clássico desenvolvido em Delphi