procedure TForm1.Button1Click(Sender: TObject);
var
  item_selecionado: String;
begin
  // vamos obter o item selecionado na ListBox
  item_selecionado := ListBox1.Items[ListBox1.ItemIndex];

  // mostra o resultado
  ShowMessage('O item selecionado é: ' + item_selecionado);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  item_selecionado: String;
begin
  // vamos obter o item selecionado na ListBox
  if ListBox1.ItemIndex > -1 then
    begin
      item_selecionado := ListBox1.Items[ListBox1.ItemIndex];

      // mostra o resultado
      ShowMessage('O item selecionado é: ' + item_selecionado);
    end
  else
    ShowMessage('Nenhum item selecionado.');
end;

static void Main(string[] args){
  // using System.Globalization;

  // obtém uma instância da classe GregorianCalendar
  Calendar c = new GregorianCalendar();

  // obtém a quantidade de dias para março de 2009
  int dias = c.GetDaysInMonth(2009, 3);

  // exibe o resultado
  Console.WriteLine("Este mês possui {0} dias", dias);

  // pausa o programa
  Console.ReadKey();
}

Calendar c = CultureInfo.InvariantCulture.Calendar;

System.ArgumentOutOfRangeException was unhandled
  Message="Month must be between one and twelve.
   Parameter name: month"
  Source="mscorlib"
  ParamName="month"

1
2
3
4
5
6
7
8
9
10 

// vamos declarar um vetor de 10 ints
int valores[];

// vamos construir o vetor...neste momento seus elementos
// terão, todos, o valor 0
valores = new int[10];

public static void main(String[] args){
  // vamos declarar um array de 10 ints
  int valores[];

  // vamos construir o array...neste momento seus elementos
  // terão, todos, o valor 0
  valores = new int[10];

  // vamos usar o laço for para inicializar seus elementos
  // com os valores de 1 até 10
  for(int i = 0; i < valores.length; i++){
    // aqui nós usamos o valor da variável i para acessar o
    // elemento do array e também para atribuir o valor de i + 1
    // ao elemento sendo acessado
    valores[i] = (i + 1);
  }

  // só nos resta exibir os valores de todos os elementos
  for(int i = 0; i < valores.length; i++){
    System.out.println(valores[i]);
  }
}

# argumentos para mktime
Time.mktime(year [, month, day, hour, min, sec, 
  usec) => time

#argumentos para local
Time.local(year [, month, day, hour, min, sec, 
  usec]) => time

# constrói uma data usando o método mktime
# passando o ano, mês e dia
hoje = Time.mktime(2008, 11, 22)

# exibe o resultado
puts "A data é: " + hoje.to_s

# constrói uma data e hora usando o método mktime
# passando o ano, mês, dia, horas, minutos e segundos
hoje = Time.mktime(2008, 11, 22, 20, 25, 10)

# exibe o resultado
puts "A data e hora é: " + hoje.to_s

procedure TForm3.Button1Click(Sender: TObject);
begin
  // vamos adicionar alguns itens ao ComboBox
  ComboBox1.Items.Add('Java');
  ComboBox1.Items.Add('C++');
  ComboBox1.Items.Add('Python');

  // vamos obter a quantidade de itens no ComboBox
  ShowMessage('O ComboBox possui '  + IntToStr(ComboBox1.Items.Count) +
    ' itens.');
end;