28
« en: Sábado 9 de Abril de 2005, 09:16 »
Tengo otro problema, recorro los caracteres uno a uno mirando si es numero o no pero con el ultimo siempre me da error. Este es el codigo, a ver si me podeis ayudar:
oid __fastcall TAltaImp::Button1Click(TObject *Sender)
{
String Numeros,Lletra;
char c;
bool result;
int i;
Numeros=(DNI->Text).SubString(1,8);
Lletra=(DNI->Text).SubString(8,9);
result=true;
i=1;
while ((Numeros!=Null()&&(i<=8) && (result==true)))
{
DNI->Text ="DNI incorrecte";
c=Numeros;
result=(c>=0)||(c<=9);
i=i+1;
}
if (result==true)
{
DNI->Text ="DNI correcto";
}
else
{
DNI->Text ="DNI incorrecto";
}
}
Gracias