wieso machst du aus einem pointer noch einen?
Delphi-Quellcode:
DPD:=StrToIntDef(dm_auftrag.q_buchungskontrolle['versand_id'],0);
P:=@DPD;
Ebene1.Data := pointer(p);
versuch es mal so:
Delphi-Quellcode:
DPD:=StrToIntDef(dm_auftrag.q_buchungskontrolle['versand_id'],0);
Ebene1.Data := @DPD;