Delphi的Edit控件中怎么实现象VB中Edit控件的Validate事件?

解决方案 »

  1.   

    Validate事件是什么事件, 什么时候发生?
      

  2.   

    可以在Edit的OnChange事件中加入你的判断
    不合法时提示即可
      

  3.   


     procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
         if key=vk_return then
           begin
             showmessage('ok');
            // doyoursomething
           end;end;
      

  4.   

    onExit           //焦点转移时发生。onReturnPressed  //按下回车时发生。不过好像没有使焦点不被转移的参数,而VB中如果输入不正确可以锁住焦点!