^(((class[ ]+)?(procedure|function)|constructor|destructor|interface|implementation|initialization|finalization).*)$ ^(.*=[ ]*(class|record).*)$