stringlistdef.go

//----------------------------------------
//
// Copyright © ying32. All Rights Reserved.
//
// Licensed under Apache License 2.0
//
//----------------------------------------

package vcl

func (s *TStringList) AddStrings(list IStrings) {
	s.AddStrings3(list, false)
}

func (s *TStringList) AddStrings2(sArr []string) {
	s.BeginUpdate()
	defer s.EndUpdate()
	for _, v := range sArr {
		s.Add(v)
	}
}

func (s *TStringList) AddStrings3(list IStrings, clearFirst bool) {
	if list == nil {
		return
	}
	s.BeginUpdate()
	defer s.EndUpdate()
	if clearFirst {
		s.Clear()
	}
	if s.Count()+list.Count() > s.Capacity() {
		s.SetCapacity(s.Count() + list.Count())
		for i := int32(0); i < list.Count(); i++ {
			s.AddObject(list.S(i), list.Objects(i))
		}
	}
}

func (s *TStringList) AddPair(name, value string) *TStrings {
	return s.AddPair2(name, value, nil)
}

func (s *TStringList) AddPair2(name, value string, object IObject) *TStrings {
	s.AddObject(name+string(s.NameValueSeparator())+value, object)
	return AsStrings(s)
}