DS> Var objBuf   :CString;

 DS>   psd.ObjectBuffer := {at}objBuf;
 DS>   psd.ObjectBuffLen := 100;

I don't program in Pascal, but it seems to me that you haven't allocated
any memory for the object buffer.  Are you _sure_ that the above code is
how you allocated a 100 byte object buffer and pass its address in Speed
Pascal ?  

 ¯ JdeBP ®

--- FleetStreet 1.16 NR