Source position: seqmid.inc line 384
procedure snd_seq_ev_set_chanpress(
ev: Psnd_seq_event_t;
ch: cuchar;
val: cint
);