这个OnGetValue事件中需要楼主自己写代码来获得值。比如
procedure TFLOWELEMENTGROUP.ParamTaskGUIDParamGetValue(Sender: TObject; var Value: Variant);
begin
if CurrentFlowControl <> nil then
Value := CurrentFlowControl.CurrentTask.GUID
else
Value := Variants.Null;
end;
获得当前任务的GUID值。