Open maker2k opened 1 year ago
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?
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?