private void button2_Click(object sender, EventArgs e){
  // using System.IO;
  this.BackgroundImage = new Bitmap(Path.GetDirectoryName(
    Application.ExecutablePath) + @"\imagens\foto.jpg");
}

using System;

namespace Estudos {
  class Program {
    static void Main(string[] args) {
      string frase = "Gosto de C#";
      Console.WriteLine("String original: " + frase);

      // obtém um array de caracteres a partir da string
      char[] letras = frase.ToCharArray();

      // exibe os caracteres no array
      for (int i = 0; i < letras.Length; i++) {
        Console.WriteLine(letras[i]);
      }

      Console.WriteLine("Pressione uma tecla para sair...");
      Console.ReadKey();
    }
  }
}

procedure TForm1.Button1Click(Sender: TObject);
var
  valor1, valor2, soma: Integer;
begin
  // vamos receber as strings dos TEdits e converter
  // seus valores para inteiros
  valor1 := StrToInt(Edit1.Text);
  valor2 := StrToInt(Edit2.Text);

  // vamos obter a soma dos dois valores
  soma := valor1 + valor2;

  // vamos exibir o resultado. Note o uso de IntToStr() para
  // converter o valor inteiro em string
  ShowMessage('A soma é: ' + IntToStr(soma));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  valor: Integer;
begin
  // vamos tentar converter o valor da caixa de texto
  // em um inteiro
  if TryStrToInt(Edit1.Text, valor) then
    ShowMessage('Conversão efetuada com sucesso.')
  else
    ShowMessage('Erro na conversão');
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  valor: Integer;
begin
  // vamos converter o valor da caixa de texto
  // em um inteiro. Se a conversão não puder ser feita
  // o valor 10 será atribuído à varial valor
  valor := StrToIntDef(Edit1.Text, 10);

  // vamos exibir o resultado
  ShowMessage(IntToStr(valor));
end;

private void button1_Click(object sender, EventArgs e){
  // vamos adicionar alguns itens na ListBox
  listBox1.Items.Add("Java");
  listBox1.Items.Add("C++");
  listBox1.Items.Add("Delphi");
  listBox1.Items.Add("Python");
  listBox1.Items.Add("VB.NET");

  // vamos definir a seleção da lista como seleção múltipla
  listBox1.SelectionMode = SelectionMode.MultiExtended;
}

private void button2_Click(object sender, EventArgs e){
  // vamos obter a lista de itens selecionados
  ListBox.SelectedObjectCollection selecionados = 
    new ListBox.SelectedObjectCollection(listBox1);
  
  // vamos excluir todos os itens selecionados
  for(int i = selecionados.Count - 1; i >= 0; i--){
    listBox1.Items.Remove(selecionados[i]);
  }
}

private void button2_Click(object sender, EventArgs e){
  // vamos excluir todos os itens selecionados
  for(int i = listBox1.Items.Count - 1; i >= 0; i--){
    // o item está selecionado?
    if(listBox1.GetSelected(i)){
      listBox1.Items.RemoveAt(i);
    }
  }
}

package arquivodecodigos;

import java.awt.Toolkit;
import java.awt.event.*;
 
public class Estudos{
  public static void main(String[] args){
    Toolkit tk = Toolkit.getDefaultToolkit();    
     
    if(tk.getLockingKeyState(KeyEvent.VK_CAPS_LOCK))
      System.out.println("A tecla Caps Lock está ativada");  
    else
      System.out.println("A tecla Caps Lock não está ativada");    
 
    System.exit(0);
  }
}