Ver Mensaje Individual
  #5  
Antiguo 21-10-2015
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.298
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Suponiendo que el botón de modificar sea este:

Código Delphi [-]
procedure TFprincipal.BmodificarClick(Sender: TObject);
begin
      fmodulo.talumnos.Active:=true;
      fmodulo.talumnos.Locate('id_alumnos',fmodulo.zqlistado_alumnos.FieldByName('id_alumnos').AsString,[]);
      modificacion:=true;
      PageControl1.ActivePageIndex:=1;
      dbapellido.Enabled:=true;
      DBnombre.Enabled:=true;
      DBdni.Enabled:=true;
      DBdireccion.Enabled:=true;
end;

Lo que yo haría sería añadir un booleano como resultado del Locate.
Y consultas si has encontrado el registro o no.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita