Hello World em Delphi

Hello World

* 1° Inicie o Delphi.
* 2° No formulário que apareceu na tela, coloque um botão(Tbutton).

Nota: para colocar um botão, basta clicar sobre ele na paleta Standard e depois clicar no formulário, caso queira requintar seu aplicativo, altere suas propriedades.

* 3° Clique duas vezes sobre o botão que apareceu.
* 4° Deverá aparecer o seguinte código na sua tela:

procedure TForm1.Button1Click(Sender: TObject);
begin
end;

* 5° Verifique que estamos programando o evento onclick do botão, ou seja o que programarmos irá acontecer quando o usuário clicar no botão.
* 6° Vamos utilizar a procedure ShowMessage() da unit Dialogs, ela é responsável por mostrar uma mensagem na tela.
* 7° Entre o begin e o end do evento digite:

ShowMessage('Hello World');

* 8° O código final deverá ficar assim:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Hello World');
end;

* 9° Clique no botão verde da barra de ferramentas (uma seta para a direta) ou tecle F9.
* 10° pronto, seu primeiro programa em Delphi esta rodando.


Tratamento de String

1 - Crie um Botão, de um duplo click nele:

procedure TForm1.Button1Click(Sender: TObject);
var
texto:string; // variavel tipo string
begin
texto := 'Hello World'; // valor da variavel

ShowMessage(texto); // mostra toda variavel
ShowMessage(Copy(texto, 1, Length(Texto) - 1)); //retira ultima letra da string
ShowMessage(Copy(texto, Length(Texto) , 1)); // imprime primeira letra da string
ShowMessage(Copy(texto, 4, 5)); // imprime da 4 a 5 letra da string
end;

end.