Violación de Dirección Access violation at adress

[Manuel]

Bueno esto pasa en un software que tengo instalado en varios pc's, y en varias partes muy distintas del país, lo raro que en 2 instalaciones aparece cuando quiere cargar una forma, pero no siempre genera el error, solo en dos pc de distintas partes, a los otros usuarios nunca le ha sucedido, que podrá ser?, el soft. no es porque no funcione bien, en otras partes con pc y S.o iguales todo bien, me piden solución pero ni se lo que podrá ser. Alguna sugerencia?.

[AzidRain]

Regla Zen 1 de Delphi:

"Si un programa funciona bien en un equipo y en otro no el problema siempre se encuentra en el software

Regla de Murphy sobre bugs:

Si pudiste haber escrito mal código al hacer un programa...seguramente lo hiciste

[rruz]

Te recomiendo que uses Eurekalog para hacer un trace de los errores.
Esta app te indicara donde se produjo el error indicandote incluso el numero de linea de tu codigo fuente.

http://www.eurekalog.com/

Saludos
.

[mzell]

Hola Manuel.

Te sugiero que revises la configuración regional de la computadora donde instalastes el sistema (Panel de Control -> Configuración Regional e Idioma).
Podría ser que la configuración del formato de fechas y números y monedas estén causando problemas.
He tenido una experiencia similar al emplear unos componentes de terceros para editar fechas y valores numéricos (Los componentes Edit de LMD Tools SE, aunque eso fué un par de años, a lo mejor ya los mejoraron). En las computadoras windows que empleaban formatos en inglés me funcionaba bien, pero al correrlo en una pc con formatos en español aparecía un mensaje de error de AV. Al configurar el equipo para utilizar el formato en inglés, el problema desapareció. Al final terminé reemplazando los controles.
Si, suena extraño, pero sucede.:confused:

Bye

[Manuel]

mzell, voy a revisar la configuración regional a ver que pasa, más precisamente el error se produce cuando cargo una forma de esta manera:

try
Screen.Cursor := crHourGlass;
Fasistenciaanual:= TFasistenciaanual.create(Self);
finally
Screen.Cursor := crDefault;
end;
Fasistenciaanual.Showmodal;
Fasistenciaanual.Free;



Ahora como digo solo se produce el error en algunos equipos y no siempre.

[mzell]

Hola Manuel.
Porque no pruebas de esta forma:

try
Screen.Cursor := crHourGlass;
Fasistenciaanual := TFasistenciaanual.Create(self);
Fasistenciaanual.ShowModal;
finally
screen.Cursor := crDefault;
end;

[AzidRain]

Creo que el try está mal ubicado:

Screen.Cursor := crHourGlass;
Fasistenciaanual:= TFasistenciaanual.create( nil );
Screen.Cursor := crDefault;
try

Fasistenciaanual.Showmodal;
finally
Screen.Cursor := crDefault;
Fasistenciaanual.Free;
end;



Sería bueno si nos indicas que pusiste en el OnCreate u OnShow de FAsistenciaAnual

[Manuel]

Creo que el try está mal ubicado:

Screen.Cursor := crHourGlass;
Fasistenciaanual:= TFasistenciaanual.create( nil );
Screen.Cursor := crDefault;
try

Fasistenciaanual.Showmodal;
finally
Screen.Cursor := crDefault;
Fasistenciaanual.Free;
end;



Sería bueno si nos indicas que pusiste en el OnCreate u OnShow de FAsistenciaAnual


Todo parte de una forma principal que tiene un menú, y cargo las demas formas a medida que el usuario selecciona las opciones, ejemplo:


procedure TFMPrincipal.Inasistencia2Click(Sender: TObject);
begin
try
Screen.Cursor := crHourGlass;
Fasistenciaanual:= TFasistenciaanual.create(Self);
finally
Screen.Cursor := crDefault;
end;
Fasistenciaanual.Showmodal;
Fasistenciaanual.Free;
end;

[egostar]

Todo parte de una forma principal que tiene un menú, y cargo las demas formas a medida que el usuario selecciona las opciones, ejemplo:


procedure TFMPrincipal.Inasistencia2Click(Sender: TObject);
begin
try
Screen.Cursor := crHourGlass;
Fasistenciaanual:= TFasistenciaanual.create(Self);
finally
Screen.Cursor := crDefault;
end;
Fasistenciaanual.Showmodal;
Fasistenciaanual.Free;
end;


:rolleyes::rolleyes::rolleyes:

Coincido con AzidRain, lo que estas haciendo no me parece correcto, imaginate que pasa si por cualquier circunstancia no se puede crear la forma TFasistenciaanual, de todas todas la tratas de abrir, eso me parece un gran vacío.

Salud OS