salut

est tu sur de ta structure ?

1°)

TIRecDCA2Buf = POINTER TO RECORD
...
END;