my $name = $main->AddTextfield(
                    -name => 'nametextfield',
		    -pos=>[480,70],
		    -size => [ 140, 25 ],
                    -font => $font1,
                    -align => 'right',
                    -tabstop => 1,
		    );

$text = $main->nametextfield->Text;