如何从TMS TPlannerItem获取数据库主键？

Question

在TMS TDBPlanner OnDragDropItem事件中，PlannerItem引用您放入的项目。 从这里我如何获取数据库行的主键，以便我可以更新数据库中的相关行？

Answer 1

我找到了。 TPlannerItem作为DBKey属性。所以我这样得到它;

procedure TForm1.DBPlanner1DragDropItem(Sender, Source: TObject; X, Y: Integer;
    PlannerItem: TPlannerItem);
var
  pk: integer;
begin
  inherited;

  pk := StrToInt(PlannerItem.DBKey);

end;