各位大虾:inputquery问题:

guotao1982 2003-08-22 11:15:20
请问在用inputquery出现提示框时其提示字符不能全部显示出来,如下
inputquery('登陆','请输入你的密码',password)=false;
则在提示那里只能显示"请输入你的密"
...全文
65 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
guotao1982 2003-08-22
  • 打赏
  • 举报
回复
这位老兄你的代码在这里一样的不行呀最后一次字显示不出来缩短也没用
IORILI 2003-08-22
  • 打赏
  • 举报
回复
看我的代码:
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;
IORILI 2003-08-22
  • 打赏
  • 举报
回复
我也遇到过,我的解决办法是缩短文字信息。^_^
linuxyf 2003-08-22
  • 打赏
  • 举报
回复
那你还想显示什么?“登录”是caption,显示在窗口的顶部。
fj218 2003-08-22
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/topic/1934/1934436.xml?temp=8.892459E-02
这个问题我已回答三次了,也得了三次分了
DWGZ 2003-08-22
  • 打赏
  • 举报
回复
后面加几个空格俺一直是这样做的
TMenuItem显示在右侧 不使用MDI制作子窗体 不使用标题栏移动窗体 不使用标题栏移动窗口 两行hint 从XML文件动态创建菜单 从另外MDI子窗口读数据 使控件具有阴影效果 使每个MDIChild填充整个主窗口区域 使用Enter键替代Tab键 使用动画效果关闭窗口 使用动画方式打开窗体 使用帮助文件 使用状态栏显示hint 使用系统图标 使窗体不能移动 关闭一个MDI子窗体 创建一个能改变大小的无边界窗体 创建半透明窗体 创建圆角窗体 创建透明窗体 判断窗体是modal 制作动画应用程序图标 制作可移动不能改变大小的窗体 制作永远最小化窗口 制作透明窗口 取和设置鼠标位置 取鼠标指针下面的活动TWinControl 启动时隐藏主窗口 在 window xp 使用阴影效果 在TCombobox内显示多行文本 在TScrollBox上显示窗体 在你的程序中使用 Win XP 可视风格 在窗体上制造多边形洞 在窗体上挖洞 在窗体周围画彩色轮廓 定位messagebox 实现窗口的最小化动画效果 将InputQuery定位在窗体居中位置 怪异窗体 手动改变窗体比例 抓屏 拖拽时显示窗口内容 捕获主窗体WM_MOVE消息 改变Hint字体 改变Hint的显示时间 改变MessageDlg的按钮标题 最小化控件 最小化第二个窗口到任务栏 查找窗体注册类 格式化MessageDlg 检查PopUp菜单是否打开 检查控件是否被其它窗口遮掩 添加菜单项到系统菜单 渐变色填充窗体 特效窗口 移动指针到当前具有焦点的控件 移除系统菜单项 自动关闭TCommonDialog 运行时改变MainForm 运行时移动控件 运行时移动窗口控件 选中或取消其它窗口的复选框 通过在标题栏上右击缩小窗口 防止 Windows 最小化窗体 防止控件重画 防止窗体改变大小和移动 隐藏标题栏 隐藏窗体的最大化和最小化按钮

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧