KafkaConsumer receives other data

[maker2k]

ABytes := TFile.ReadAllBytes('d:\red.bmp')
FKafkaProducer.Produce(edtTopic.Text, @abytes, length(ABytes))

//bytes: 66, 77, 186, 1, ...

in TfrmConsume.Start

MsgRec.Data := TKafkaUtils.PointerToBytes(Msg.payload, Msg.len)

//bytes 152, 231, 229, 8, ...

data length matches!

what am I doing wrong?