请问在用inputquery出现提示框时其提示字符不能全部显示出来,如下
   inputquery('登陆','请输入你的密码',password)=false;
则在提示那里只能显示"请输入你的密"

解决方案 »

  1.   

    那你还想显示什么?“登录”是caption,显示在窗口的顶部。
      

  2.   

    看我的代码:
    procedure Tspqh_app.SpeedButton3Click(Sender: TObject);
    var
     sNewSub: string;
    begin
     //新部门
      sNewSub := inputbox('新部门','新的部门名称', '');
      if (trim(sNewSub) <> '') and (bm.Items.IndexOf(sNewSub) = -1) then
      begin
      if datamodule2.ADObm.Locate('部门名称',trim(snewsub),[]) then
      begin
       showmessage('部门名称已经存在,请重新输入!');
       exit;
      end;
      datamodule2.ADObm.Insert;
      datamodule2.ADObm.Fields[0].AsString:=trim(snewsub);
      datamodule2.ADObm.Post;
      bm.Items.Add(snewsub);
      bm.Text:=trim(snewsub);
      end;
    end;
      

  3.   

    http://expert.csdn.net/Expert/topic/1934/1934436.xml?temp=8.892459E-02
    这个问题我已回答三次了,也得了三次分了