iTesla, поупражнялся в создании элемента - похвально. Видно, что много чего узнал о функционировании элементов в стандартном пакете. Ну, а для дальнейшего развития сравни размер кода:
code_31120.txt