Tengo problemas con un listado hecho con quick report, la aplicación que lo
llama está diseñada con delphi 3.

Lo curioso de esto es que si ejecuto la aplicación y llamo al listado desde
un windows 98, el preview del listado se hace sin problemas. Ahora que
cuando instalo la misma aplicación en un XP, al hacer el preview del listado
ocurre que si el listado tiene una o dos páginas no hay ningún problema,
pero si el listado tiene tres o más aparece un mensaje de error que dice
'cannot create file', otras veces el mensaje de error que aparece es
diréctamente el clásico Access Violation.

¿Alguna idea acerca de lo que puede estar pasando?

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

Es un error del quickreport. Prueba a bajarte algun parche o a compilar
la aplicación con una versión mas reciente de delphi si no te resulta
demasiado complicado. Y si tienes tiempo yo de ti me plantearía dejar
de lado quickreport, fastreport por ejemplo es infinitamente mejor.

El problema es que el QR, cuando el informe no es pequeño, necesita
usar una carpeta temporal, y la que está por defecto en las variables
de entorno del XP tiene una ruta mas larga de lo que QR es capaz de
manejar, con lo que no puede usarla.
Mi solución es asignar a mi aplicación en el inicio, en sus variables
de entorno, una carpeta temporal que cuelgue de la raiz.
Esta asignación es solo para la aplicación actual mientras se esté
ejecutando. Las variables de entorno de Windows no se ven afectadas.
Lo hago así:

procedure TfPpal.FormShow(Sender: TObject);
var
cTemp: string;
begin
//asigno a la variable la unidad donde se ejecuta la aplicación
//seguido del nombre de la carpeta a crear:
cTemp:=extractfiledrive(application.exename)+'\tmp ';
//Si no existe previamente, la creo:
if not DirectoryExists(cTemp) then
ForceDirectories(cTemp);
//Vuelvo a comprobar para ver si se ha logrado crear:
if DirectoryExists(cTemp) then
begin
//Asigno a la variable de entorno "tmp" la ruta de la carpeta
creada:
if not SetEnvironmentVariable(PChar('tmp'),PChar(cTemp+'\ ')) then
MessageDlg('No se ha podido establecer una ruta para la carpeta
temporal'+#13+
'Puede que esto produzca errores de
ejecución.',mtError,
[mbOk],0);
end
else
MessageDlg('No se ha podido crear la carpeta temporal.'+#13+
'Puede que esto produzca errores de
ejecución.',mtError,
[mbOk],0);
end;

Espero que te solucione el problema.

Saludos.
Juan Antonio.

El problema es que el QR, cuando el informe no es pequeño, necesita
usar una carpeta temporal, y la que está por defecto en las variables
de entorno del XP tiene una ruta mas larga de lo que QR es capaz de
manejar, con lo que no puede usarla.
Mi solución es asignar a mi aplicación en el inicio, en sus variables
de entorno, una carpeta temporal que cuelgue de la raiz.
Esta asignación es solo para la aplicación actual mientras se esté
ejecutando. Las variables de entorno de Windows no se ven afectadas.
Lo hago así:

procedure TfPpal.FormShow(Sender: TObject);
var
cTemp: string;
begin
//asigno a la variable la unidad donde se ejecuta la aplicación
//seguido del nombre de la carpeta a crear:
cTemp:=extractfiledrive(application.exename)+'\tmp ';
//Si no existe previamente, la creo:
if not DirectoryExists(cTemp) then
ForceDirectories(cTemp);
//Vuelvo a comprobar para ver si se ha logrado crear:
if DirectoryExists(cTemp) then
begin
//Asigno a la variable de entorno "tmp" la ruta de la carpeta
creada:
if not SetEnvironmentVariable(PChar('tmp'),PChar(cTemp+'\ ')) then
MessageDlg('No se ha podido establecer una ruta para la carpeta
temporal'+#13+
'Puede que esto produzca errores de
ejecución.',mtError,
[mbOk],0);
end
else
MessageDlg('No se ha podido crear la carpeta temporal.'+#13+
'Puede que esto produzca errores de
ejecución.',mtError,
[mbOk],0);
end;

Espero que te solucione el problema.

Saludos.
Juan Antonio.