program const type var begin break end array set packed record string if then else while for to downto do with repeat until case of goto exit label procedure function nil file and or not xor div mod unit uses implementation interface external asm inline object constructor destructor virtual far assembler near inherited stdcall cdecl library export exports end. class ansistring raise try except on index name finally resourcestring false true initialization finalization read write override overload public protected private property published default begin object case class record try