TFlowSpec = packed record DelayVariation: LongInt; Latency: LongInt; PeakBandwidth: LongInt; TokenBucketSize: LongInt; TokenRate: LongInt; ServiceType: TServiceType; MaxSduSize: LongInt; MinimumPolicedSize: LongInt; end;