Range Error
 

Ke tal.
Tengo un problema con un programa ke estoy haciendo, lo ke hace el programa es guardar datos utilizando un savedialog, el problema es ke cuando termina de guardar y kiero volver a guardar otros datos me aparece este error: "ERange Error ... Range Check Error". Como soluciono esto?... tengo ke limpiar mediante un clear o algo asi?
Gracias por cualkier sugerencia.

hola
lo que necesitamos es un poco de codigo, para saber como lo guardas.
lo mas probable es que el error este en el codigo del SaveDialog, ponlo aqui y veremos que pasa
un saludo

Gracias. Acá te dejo parte del código:

DEFINICION DE VARIABLES
***********************

Archivo,ArchivoCorrientes,ArchivoPotencias,ArchivoTHD,
ArchivoTransientes,ArchivoArmonicos: File of Double;

nombreArchivo,NombreCorrientes,NombrePotencias,NombreTHD,
NombreTransientes,NombreArmonicos: String;


ASIGNACION
**********************

AssignFile(Archivo,nombreArchivo);
Rewrite(Archivo);

AssignFile(ArchivoTHD,nombreTHD);
Rewrite(ArchivoTHD);

AssignFile(ArchivoPotencias,NombrePotencias);
Rewrite(ArchivoPotencias);

AssignFile(ArchivoTransientes,NombreTransientes);
Rewrite(ArchivoTransientes);

AssignFile(ArchivoArmonicos,nombreArmonicos);
Rewrite(ArchivoArmonicos);

************************************
PROCEDIMIENTO DE EJECUCION DE SAVEDIALOG
************************************

procedure TForm1.Button2Click(Sender: TObject);
var
begin
if (form8.radiobutton1.checked=false) and (form8.radiobutton2.checked=false) then begin
ShowMessage('Necesita seleccionar una medición monofásica o trifásica, para esto '+
'presione el botón configurar. Si no desea continuar, presione Cancelar');
exit;end;

SaveDialog1.Title:='Almacenamiento de datos';

if SaveDialog1.Execute then begin
NombreArchivo:=SaveDialog1.Filename;
NombreTHD:=NombreArchivo + 'THD';
NombreArmonicos:=NombreArchivo + 'Armonicos';
NombrePotencias:=NombreArchivo + 'Potencias';
NombreTransientes:=NombreArchivo + 'Transientes';
Form3.Show;
Form1.Enabled:=False;
end;
end;

****************************
TERMINO DE ALMACENAMIENTO *
****************************
procedure TForm3.FormOnClose(Sender: TObject; var Action: TCloseAction);
begin
Timer1.Enabled:=False;
CloseFile(Archivo);
CloseFile(ArchivoTHD);
CloseFile(ArchivoPotencias);
CloseFile(ArchivoTransientes);
CloseFile(ArchivoArmonicos);
end;

//**********************************


No he podido encontrar que estoy haciendo mal. Gracias por cualkier ayuda.

A simple vista no se ve que trabajes con nada que pueda producir este error... ¿Haces algo en algún evento que no has puesto aquí?.. ¿Que sucede cuando muestras el Form3?