package arquivodecodigos;

// Este exemplo mostra como obter a representação
// númerica de um caractere

public class Estudos{
  public static void main(String[] args){
    String frase = "Programando em Java";
    
    for(int i = 0; i < frase.length(); i++){
      int valor = (int)frase.charAt(i);
      System.out.println(frase.charAt(i) + " = " 
        + valor);
    }    
        
    System.exit(0);
  }
}

P = 80
r = 114
o = 111
g = 103
r = 114
a = 97
m = 109
a = 97
n = 110
d = 100
o = 111
  = 32
e = 101
m = 109
  = 32
J = 74
a = 97
v = 118
a = 97

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'
  frase := ReplaceStr(frase, 'PHP', 'Delphi');

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

LRESULT SendMessage(          
  HWND hWnd,
  UINT Msg,
  WPARAM wParam,
  LPARAM lParam
);

// Protótipo
{$EXTERNALSYM SendMessage}
function SendMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM; 
  lParam: LPARAM): LRESULT; stdcall;

// Implementação
function SendMessage; external user32 name 'SendMessageW';

procedure TForm1.Button1Click(Sender: TObject);
var
  texto: String;
begin
  // conteúdo a ser definido para a caixa de texto
  texto := 'Veja isso';

  // vamos definir o conteúdo usando a função SendMessage
  // fornecendo a mensagem WM_SETTEXT
  SendMessage(Edit1.Handle, WM_SETTEXT, 0, Integer(PChar(texto)));
end;

Informe uma palavra, frase ou texto: Arquivo de Códigos
A palavra ou frase contém 2 letras maiúsculas.

package estudos;

/*
  ATENÇÃO: O código usado na resolução deste exercício não considera
  caracteres com acentos nem o cedilha. Fica a seu cargo pesquisar formas
  alternativas ou complementos
*/

import java.util.Scanner;

public class Estudos{
  public static void main(String[] args){
    // vamos usar a classe Scanner para ler a entrada do usuário
    Scanner entrada = new Scanner(System.in);
    
    // vamos pedir para o usuário informar uma palavra, frase ou texto
    System.out.print("Informe uma palavra, frase ou texto: ");
    String palavra = entrada.nextLine();
    
    // vamos contar as letras maiúsculas
    int maiusculas = 0;
    for(int i = 0; i < palavra.length(); i++){
      if(palavra.charAt(i) >= 'A' && palavra.charAt(i) <= 'Z'){
        maiusculas++;
      }
    }
    
    // mostra o resultado
    System.out.println("A palavra ou frase contém " + maiusculas +
      " letras maiúsculas.");
  }
}