![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|
|
#1
|
|||
|
|||
|
Acceso denegado
Hola. Las pantallas que se abren sólo solicitan datos, es decir son TEdit y bitbtns. El evento OnCreate de esas pantallas no tiene nada, ni el OnActivate. He comprobado que se van liberando los recursos también utilizado una librería que realiza ese chequeo (snoop) de forma automática.
Tengo puesto un TApplicationEvents que captura las excepciones que no han sido manejadas localmente y da ese mensaje de error "Acceso denegado" Además, lo que me extraña es que no me de el mensaje en inglés que es lo habitual cuando se produce una excepción (y no he cambiado los errores del delphi a español). Lo que me gustaría saber es a que se refiere la excepción "acceso denegado". ¿Acceso denegado a qué?. No encuentro información sobre eso. Gracias. |
|
#2
|
|||
|
|||
|
Otra cosa más, también tengo puesto por el programa las llamadas a esta función:
Código:
// By Ian Marteens (libera memoria viartual que no se utiliza)
procedure TModuloDatos.LiberarMemoria;
begin
if Win32Platform = VER_PLATFORM_WIN32_NT then
SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);
end;
|
|
#3
|
||||
|
||||
|
¿Has probado deshabilitar temporalmente esta función para ver si es la causante? El mensaje, por lo mismo que dices de que no has traducido ningún recurso de Delphi suena a provenir del sistema y supongo que si tu Windows está en español de ahí que el mensaje salga en español.
// Saludos |
|
#4
|
||||
|
||||
|
Algo que te puede arrojar una luz, es la clase de la excepción que se ha elevado, que en el evento OnException viene en el parámetro E, y que podes averiguar consultando su propiedad ClassName.
Hasta luego. ![]()
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|