怎么把指针的内容传到CLASS里面去？(50)

TReceiveDataEvent = procedure(Sender: TObject; Buffer: Pointer; BufferLength: Word) of object;这是DELPHI里一个方法的写法，现在我在别的平台用这个方法，可那个平台里不能使用指针，查了下说必须要把这个指针的内容传到CLASS里，再在那个平台里读取这个CLASS才行。可要怎么把指针内容传到CLASS里面去呢。