frameHeadObservationResultsUnit
type TObsHeadLinkList = class(TObjectList<TObsHeadLink>)
function IndexOfModel(AModel: TBaseModel): Integer;