problemas con el pagecontrol

[Neftali [Germán.Estévez]]

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.