procedure Initialize(const TextToParse: String; FullNumbers: Boolean=True; APropertyNameType: Char=tkString)