procedure TForm1.Button1Click(Sender: TObject);
var
  frase: string;
begin
  frase := 'PHP? Sim, eu gosto muito de PHP';

  // vamos substituir todas as ocorrências de "PHP" por "Delphi'
  // sem considerar maiúsculas e minúsculas
  frase := ReplaceText(frase, 'Php', 'Delphi');

  // vamos exibir o resultado
  ShowMessage(frase);
end;

package arquivodecodigos;

public class Estudos{
  public static void main(String[] args){
    String s1 = "Gosto de Java";
    String s2 = "Gosto de Java";
     
    if(s1.equals(s2)){
      System.out.println("As duas strings sao iguais");
    }
    else{
      System.out.println("As duas strings não sao iguais");  
    }
    
    System.exit(0);
  }
}

procedure TForm1.Button1Click(Sender: TObject);
var
  pvalor: ^integer;
begin
  // vamos exibir o valor da variável referenciada pelo
  // ponteiro pvalor
  ShowMessage(IntToStr(pvalor^));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos exibir o valor da variável referenciada pelo
  // ponteiro pvalor
  if pvalor = nil then
    ShowMessage('O ponteiro ainda é nulo.')
  else
    ShowMessage(IntToStr(pvalor^));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos atribuir um valor à variável valor
  valor := 14;

  // vamos "apontar" nosso ponteiro para o local de
  // memória da variável valor
  pvalor := @valor;

  // vamos exibir o valor da variável apontada por pvalor
  ShowMessage(IntToStr(pvalor^));

  // vamos marcar pvalor como nulo
  pvalor := nil;

  // vamos causar um EAccessViolation já que pvalor
  // não aponta para nenhum local na memória agora
  ShowMessage(IntToStr(pvalor^));
end;

 
package arquivodecodigos;

import javax.swing.*;
import java.awt.*;
import java.awt.event.*;
 
public class Estudos extends JFrame{
  JCheckBoxMenuItem cores[];
  Color valCores[] = {Color.red, Color.white,
    Color.green};  
  String nomeCores[] = {"Vermelho", "Branco",
    "Verde"};
 
  public Estudos(){
    super("Menus");
 
    // Cria a barra de menus
    JMenuBar barra = new JMenuBar();
    setJMenuBar(barra);
 
    // Cria um menu
    JMenu formatar = new JMenu("Formatar");
     
    // Cria o menu de cor de fundo
    JMenu item1 = new JMenu("Cor de Fundo");
    
    // Adiciona o segundo JMenu ao primeiro
    formatar.add(item1);
 
    cores = new JCheckBoxMenuItem[valCores.length];
 
    Gerenciador gerenciador = new Gerenciador();
  
    for(int i = 0; i < valCores.length; i++){
      cores[i] = new JCheckBoxMenuItem(nomeCores[i]);
      item1.add(cores[i]);
      cores[i].addItemListener(gerenciador);
    } 
 
    // Adiciona o menu à barra de menus
    barra.add(formatar);
 
    setSize(300, 150);
    setVisible(true);    
  }
 
  public static void main(String args[]){
    Estudos app = new Estudos();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
 
  private class Gerenciador implements ItemListener{
    public void itemStateChanged(ItemEvent e){
      String marcadas = "As checkbox marcadas são:\n\n";     
  
      for(int i = 0; i < cores.length; i++){
        if(cores[i].isSelected()){
          marcadas += nomeCores[i] + "\n";
        }
      }
 
      JOptionPane.showMessageDialog(null, marcadas); 
    }
  }
}

public static Locale getDefault()

import java.util.*;

public class Estudos{ 
  public static void main(String args[]){ 
    // obtém o Locale padrão da JVM
    Locale locale = Locale.getDefault();
    
    // vamos exibir o código da linguagem e nome do
    // país para o Locale obtido
    System.out.println(locale.getLanguage() + " - "
      + locale.getDisplayCountry()); 
  } 
}

pt - Brasil