Source position: googlegan.pp line 583
published property TEvent.kind : string index 56 read Fkind write Setkind;