if　(SpinEdit1.value　mod 4)<>0　then abort;