退格的代码
procedure TForm1.Button18Click(Sender: TObject);
begin
   PostMessage(edit1.Handle,WM_CHAR,VK_BACK,0);
end;
这个一下全部删掉了，只退一个字符要怎么破啊，感激不尽！！！

[ 本帖最后由 nick_ping 于 2013-2-28 15:39 编辑 ]

速求各路好汉支援，感激不尽！！

回复的人好少