assignfile
ok en 1º er lugar quiero agradeser la pronta repuesta y 2º quiero disculpame pues copie un bloque del programa que estava en proceso de modificacion y esta por ende no tiene sentido
el codi real es:
type
registro = record
salida : array[1..8]of integer;
clav1:string[30];
clav2:string[30];
saludo:string[30];
menu: array [1..8]of string[50];
articulo:array[1..8]of string[30];
ring:integer;
end;
procedure TForm1.Button1Click(Sender: TObject);
var reg:registro;
arch:file of registro;
begin
assignfile(arch,'c:\domo\config.dat');
reset(arch);
read(arch,reg);
end;
el error se produce en assignfile y el error es:
[Error] domo.pas(208): There is no overloaded version of 'AssignFile' that can be called with these arguments
__________________
CAM
|