Проблема в следующем, есть к примеру 2 структуры
Код:
type TUser = record
user_id : Integer;
user_name : String[16];
user_mail : String[32];
user_age : Integer;
cat_id : integer;
end;
и
Код:
type TCat = record
cat_id : Integer;
cat_name : String[16];
user_date : String[16];
end;
У меня не получается написать процедуру по чтению файла. В качестве аргументов желательно должны передаватся 1 название файла, 2 название структуры которую использовать для выборки.
Проблема возникает в том как обльявлять локальную файловую переменную функции.
var F :File of //здесь должен быть тип но он должен зависить от структуры которую использую. Наверняка нужно использовать указатели но я перебробовал разные комбинации не получается. Как можно реализовать такую функцию.