Ver Mensaje Individual
  #3  
Antiguo 18-12-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 28
Lepe Va por buen camino
Releyendo el hilo, no haría falta lo de totalSocios:

Código Delphi [-]

m := 'OK';
i:=0;
while m = 'OK' THEN
begin
 inc(i);
 BuscarSocio( i, c,m);
 if m = 'OK' then 
 if c.Nombre = edit1.text then
   break; // salimos del bucle porque lo hemos encontrado.
end;

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita