delphi编写的大小写转换-程序源码,自动将用户输入的大写字符转换了小写,以一个用户注册程序为例,将用户的登录名转换为小写字母,请在Delphi7环境下测试。以下是主要的代码: procedure TForm1.Edit2Exit(Sender: TObject); begin if CheckBox1.Checked=true then edit2.text:=LowerCase(edit2.text) else edit2.text:=Uppercase(edit2.text) end; procedure TForm1.Edit3Ex