avaliando text de 2 edits

Siga os passos com atenção que é bem simples:

Primeiro passo.
Inicie o delphi e abra um novo Form e por inquanto não ponha nada,
Na janela Object Inspector vamos mudar o Caption do Form1 para Avaliador.


Segundo passo:

Agora coloque 1 panel remova seu Caption e depois coloque 2 Edits e remova o texto deles.

Agora adicione 2 Buttons e mude o Cation do Button1 para (Avaliar) e do Button2 para (Sair).

Adicionei um xpmanifest na parte inferior do programa para dar um toque mais elegante ao programa.

Terceiro passo.
Clique no botão Avaliar e insira o seguinte código:


begin
if AnsiCompareText(Edit1.Text, Edit2.Text) = 0 then
ShowMessage('O texto é igual.')
else
ShowMessage('O texto é diferente.');
end;

Agora clique no botão Sair e coloque o seguinte código:

Close;

Aperte F9 e compile, escreva algo no edit1 e outra coisa do edit2 e clique em avaliar !
Ele ira avaliar se esta escrito a mesma coisa !