1、怎样实现Edit的LostFocus和SetFocus事件(VB中有这两个事件,不知道Delphi中怎样加入这两个事件)
2、怎样控制Edit中只能输入数字、‘\'和BackSpace键
3、怎样设置Edit中的数据为右对齐以上3个问题,请程序实例一下,谢谢了!(第一次Delphi用作课题)

解决方案 »

  1.   

    在edit的KeyPress事件中写如下代码
    if not (key in ['0'..'9', #8,'\']) then
      Key := #0;
      

  2.   

    oklida(JAVA战士)的就是了  主要是过滤ASCII值
    2.edit好像不可以用属性简单的设置右对齐吧实在要用可用memo代替(memo就有属性设置右对齐了 Alignment)
      

  3.   

    1.OnEnter、OnExit事件;
    2.oklida(JAVA战士)的方法;
    3.不能简单实现,可用重写此控件来实现
      

  4.   

    在edit的KeyPress事件中写如下代码
    if not (key in ['0'..'9', #8,'\']) then
      Key := #0;