Pascal unit header changed