2yNNx@Q (N <HVa;)m{ /?Laq}+;GS_nFy!-9HUgr~(2(),;[]and arrayasasm begin case class const constructor destructor dispinterfacedivdo downto elseend except exports file finalization finallyfor function gotoifimplementationin inheritedinitialization inline interfaceis label librarymodnilnot objectoforout packed procedure program property raise record repeatresourcestringsetshlshr string then threadvartotry type unit until usesvar while withxor private protected public published automatedatonDelphi0_\8]P]dPhprocedure \(.*\)(L I~(**)Comment Multi LineA''\String Single Line