if edit4.maxLength<8 then
begin
messagedlg('请输入帐号的最后至少8位数',mtWarning,[mbok],0);
end
else
begin
showmessage('ok') ;
end;

解决方案 »

  1.   

    用LENGTH函数可以取得长度的试一下了
      

  2.   

    用LENGTH函数可以取得长度的试一下了
    这个函数不能通过?
      

  3.   

    maxLength属性是允许当前TEdit输入的字符的最大长度.
    showmessage(length(Edit1.text));
      

  4.   

    edit4.maxLength是edit4的最大可输入字符数,不是已输入字符数.
      

  5.   

    如何让edit4至少要输入8位呢?
      

  6.   

    if length(edit4.text)<8 then
    begin
    messagedlg('请输入帐号的最后至少8位数',mtWarning,[mbok],0);
    end
    else
    begin
    showmessage('ok') ;
    end;