criticar nome

Delphi

21/06/2004

ola pessoal por favor me ajudem ... estou tentando criticar quando alguem tenta gravar no lugar do nome um numero

em linguagem sql

ex.: alan2 junior

msg
vc digitou um nome inválido!!!!!


Alanjrs

Alanjrs

Curtidas 0

Respostas

Paulo_amorim

Paulo_amorim

21/06/2004

Olá

Via delphi vc pode fazer varrendo a string.

for i := 1 to Length( MinhaString) do
if MinhaString[i] in [0..9] then...

Mas como vc quer fazer isso via SQL??

Até+


GOSTEI 0
Motta

Motta

21/06/2004

qual bd ?


GOSTEI 0
Macario

Macario

21/06/2004

Ola programador, boa tarde.

Creio que voce deva estar usando um SGBD, mas de qualquer forma
voce tera uma aplicação front-end
entao pode ser isto


[color=green:962adab341]procedure TForm1.Edit1Exit(Sender: TObject); begin if Pos (Edit1.text,´0123456789´) > 0 then ShowMessage(´Você digitou um nome inválido!!!!!´); end;[/color:962adab341]



espero ter ajudado


GOSTEI 0
POSTAR