uses u_shortstring2; begin end.