做一个计算器的程序，其中用退格删最后一个字符的代码是：   
  Edit1.SetFocus;   
  Edit1.SelStart   :=   Length(Edit1.Text);   
  Edit1.Perform(WM_CHAR,   VK_BACK,0);

但没看懂？哪位能给解释一下，这段代码是如何实现退格功能的。谢了。