Hola, te recomiendo que leas la guia de estílo.
Si vas a operar con archivos no puedes utilizar una variable string porque su tamaño es muy grande y no está delimitado, por eso es mejor establecer un
packed record y delimitar el tamaño del string a 255 caracteres.
Código Delphi
[-]
type
TConf = packed record
archivo: String[255];
narchivo: integer;
ale_pase: boolean;
ch1:boolean;
ch2:boolean;
end;
FConf = File of TConf;
function cf_save(cf: Tconf): FConf;
procedure cf_save(cf: TConf; out Conf: FConf);
Saludos.