procedure TForm1.Button1Click(Sender: TObject);
var
  quant: Integer;
begin
  // vamos adicionar dois itens na TListBox
  ListBox1.Items.Add('Item 1');
  ListBox1.Items.Add('Item 2');

  // vamos obter a quantidade de itens
  quant := ListBox1.Items.Count;

  // exibe o resultado
  ShowMessage('Quantidade de elementos: ' + IntToStr(quant));
end;

quant := ListBox1.Count;

package estudos;

import java.util.Calendar;

public class Estudos {
  public static void main(String args[]) {
    // vamos obter uma instância da classe Calendar
    Calendar agora = Calendar.getInstance();
    
    // agora vamos obter o dia do mês como um inteiro
    int dia_mes = agora.get(Calendar.DAY_OF_MONTH);
    
    // e mostramos o resultado
    System.out.println("O dia do mês é: " + dia_mes);
  }
}

void __fastcall TForm3::Button2Click(TObject *Sender)
{
  // vamos obter a quantidade de caracteres no TEdit
  int tamanho = Edit1->GetTextLen();

  // vamos mostrar o resultado
  ShowMessage("O Edit contém " + IntToStr(tamanho) + " caracteres.");
}

package arquivodecodigos;

public class Estudos{
  public static void main(String[] args){
    // cria um vetor de cinco elementos
    String[] pessoas = {"Fábio", "Fernanda", 
      "Francisco", "João", "Osmar"};
       
    // obtém o tamanho do vetor
    int quant = pessoas.length;
    System.out.println("Este array possui " 
      + quant + " elementos");
       
    System.exit(0);
  }
}

public class Estudos{
  public static void main(String args[]){
    double valor = 54.5;
    
    System.out.println("O valor da variável é: " +
      valor);
    
    System.exit(0);
  }
}

double valor = 54.5;
int valor2 = (int)(valor);