Como fazer isto ? EDIT1.TEXT...

Delphi

06/03/2003

Como dizer por exemplo: Se Edit1.text for igual a ´manga´ ou ´MANGA´ ou Manga´ then aparece mensagem ´LEGAL´. Como fazer isto com IF, ELSE e THEN ?

Rodrigo!


Ropesca

Ropesca

Curtidas 0

Respostas

Anonymous

Anonymous

06/03/2003

if AnsiUpperCase( Edit1.text ) = ´MANGA´ then
ShowMessage(´Legal´);


o AnsiUpperCase é melhor do que UpperCase, pq ele entende letras com acento...


GOSTEI 0
POSTAR