请问有什么方法或控件实现在edit框中从右边显示,按某按钮后并从右边加数字? 就像windows附件中的计算器中的edit框一样,数字从右边显示,按按钮后,从右边加数字!非常感谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 继承TEdit,重载CreateParams,修改Param即可。procedure TEdit_Ex.CreateParams(var Params: TCreateParams);begin inherited; if self.FTextOnRight then Params.Style:=Params.Style or ES_RIGHT;end; fhuibo(Sailor) 的办法,是常用并且很经典的解决问题的办法。你先学懂了再想其他更好的办法吧。 to:fhuibo(Sailor)那你的代码应该放在哪儿呢?前面所说的tedit继承,重载CreateParams,具体应该如何实现呢? 高手帮我看看下面的代码哪里有错误? 如何把Delphi中用ADO 连 ODBC(ACCESS 数据库)单机版改为网络版。 每日一贴,怎样写? 请高手进入 转信息到Excel的问题 大富翁怎么上不了了? 怎样设定QReport每页打印的记录的条数? 关于打印时出现纸张跳行现象... 如何声明一个自定义函数和过程? 怎样删除文件啊? 存储过程在返回纪录集的同时能否返回一些参数,如果可以该怎么做? 紧急求助:TQuery查询出来的结果,如何进行修改并存入数据库中。 怎么把dbgrid1中的字段标题改成中文?
procedure TEdit_Ex.CreateParams(var Params: TCreateParams);
begin
inherited;
if self.FTextOnRight then
Params.Style:=Params.Style or ES_RIGHT;
end;
那你的代码应该放在哪儿呢?
前面所说的tedit继承,重载CreateParams,具体应该如何实现呢?