ActiveDelphi

[Netrunner]

Queria saber se tem uma forma de bloquear strings, deixar somente nome proprio sem ter que criar uma stringlist e colocar todas strings existente no teclado..

exemplo
Liberar somente Netrunner
se tentar Netrunner. ou Netrunner# etc.. ele da um aviso..

[johnny-walker]

Para isto vc teria de criar um dicionário de verbetes, pois isto dentro do programa seria inviável.
Este processo é o mesmo que o word faz para analisar erros de grafia.
Somente vc dar uma pesquisada que vc encontra algo sobre o asunto.


bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I

[Netrunner]

Eu penso em algo assim :

begin
{se alguma das teclas abaixo for precionada}
if ( Key In ['A'..'Z', 'a'..'z', '@','!','#','$', '%','^',
'&','`','~','*','(',')','-','_','=','+','|','','/','<','>',
'"',';',':','[',']','{','}','''' ]) then {entao}
begin


if not nome in ['A'..'Z'] then begin
nome invalido.

tem como?