(* Заголовочный файл для примера работы с разделяемой памятью *)

const   
  SHMKEY1:tkey=$10; (* ключ разделяемой памяти *)
  SHMKEY2:tkey=$15; (* ключ разделяемой памяти *)
  SEMKEY:tkey=$20; (* ключ семафора *)
   
  (* Размер буфера для чтения и записи *)
  BUFSIZ=8192;
  SIZ=5*BUFSIZ;
   
(* В этой структуре будут находиться данные и счетчик чтения *)
type 
  databuf=record
    d_nread:integer;
    d_buf:array [0..SIZ-1] of char;
  end;
  pdatabuf=^databuf;


   
