[Tutorial] Avaliando texto de 2 edits

['Lenneth 498]

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

 

Primeiro passo.

Inicie o delphi e abra um novo **** 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 !

 

Creditos Before123

[iMelo~' 18]

hoho garotinho se ta bot demais hoje em , postando varios topicos bem uteis , obrigado por compartilhar com a wc.

[lenon321 0]

Puro CTRL+C n sei como ninguem percebeu.

[cometudo 1]

ai eu vou e pergunto porque não diminuir isso

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

deixando

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

que alem de se torna mais simples é menor? y.y

[ZoonerSoftware 0]

Este tutorial é de um usuário chamado QuIx.

Ele postou isso em outro lugar.Pare de retirar os créditos.

[cometudo 1]

essse cara é retardado ele ja postou 3 coisas que eu vi sem créditos y.y