DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: aaaarrrrrrrrrrrr
今日帖子: 57
在线用户: 3
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 zzr173 (冰树) ★☆☆☆☆ -
盒子活跃会员
2004/5/6 20:48:10
标题:
combobox的问题... 浏览:1015
加入我的收藏
楼主: 请问哪位朋友知道怎么使combobox既能使用csDropDownList属性(即只能选择),同时有能用程序设置显示内容(即text)?
----------------------------------------------
以静制动
作者:
男 sephil (NAILY Soft) ★☆☆☆☆ -
盒子中级会员
2004/5/6 21:13:54
1楼: 嘿嘿

不要用csDropDownList,还是用csDropDown
然后

procedure TForm1.FormCreate(Sender: TObject);
var
  Wnd: HWND;
begin
  Wnd := FindWindowEx(ComboBox1.Handle, 0, 'Edit', nil);
  SendMessage(Wnd, EM_SETREADONLY, 1, 0);
end;

这样你可以用代码控制Text(ComboBox1.Text := '123')
但是用户不能编辑其中的文字,只能选择
可以满足你的要求吧
----------------------------------------------
Copyright 2008 ? NAILY Soft

Click here to redirect to my home
Click here to redirect to my blog
作者:
男 zzr173 (冰树) ★☆☆☆☆ -
盒子活跃会员
2004/5/6 22:26:40
2楼: 谢谢谢谢谢谢谢谢啦
已经解决了
----------------------------------------------
以静制动
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行50.78125毫秒 RSS