Копирование структур record

[Gausse]

 Lexems=record
     lexem:string;
     id,reg,rez_word,lbl,number,sep,trash,text:boolean;
     num_r:integer;
     value:string;
  end;
  Row=record
    lex:array of Lexems;
    num:integer;
    offset:integer;
  end;
mat=record
    id:string;
    kind:string;
    value:comp;
    string_value:string;
    error:string;
    seg:segment;
    offset:integer;
  end;

id_tabl:ar_mat;
  temp:ar_row;

[Serge_Bliznykov]

всё. этого достаточно...

lex:array of Lexems;

lex - это у Вас НЕ МАССИВ, это УКАЗАТЕЛЬ на область памяти (почитайте, как организованы динамические массивы)...