如何检测输入框中填写想是否是自己想要的数据? 在添加记录时,有数据要求,如 edit1要填写货币型数据 edit2要填写字符型数据 edit3要填写数字型数据如何判断是否符合要求? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 限制键盘输入不能防止粘贴,需要做个假Popup菜单procedure TfrmReportProvider.lbledtAsset1KeyPress(Sender: TObject; var Key: Char);begin inherited; if not(Key in ['0'..'9','.',#8]) then key:=#0;//限制为数字和小数点end; Delphi 版权问题。 200分,再 cxGrid 中,数值型字段前总有 人民币 符号,如何设置成没有? 求救,关于URLDOWNLOADFILE的接口回调函数的问题~ paradox表中的字段怎么自动编号? 用dbexpress打开db2数据表时,出现Invalid Field Type,请问如何解决? 又一个很菜的问题!给你送分了 動態創見了一個 EXCEL OLE 對象,但是不能釋放,為沈麼? 打印机兼容问题。 这是为什么,难道是D5的bug? 怎么今天sql和我过不去啊:( 怎么实现退格功能?求救! 问一个大家都认为会的问题
不能防止粘贴,需要做个假Popup菜单
procedure TfrmReportProvider.lbledtAsset1KeyPress(Sender: TObject;
var Key: Char);
begin
inherited;
if not(Key in ['0'..'9','.',#8]) then key:=#0;//限制为数字和小数点
end;