如题,怎么实现在EDIT中只能输入IP,不能输入其他字符,请高手指点。
还有就是键盘上的键在DEIPHI中应该怎么表示出来,如回车是#13,空格是#8,其他的呢?如果小数点,问号等。
还有就是键盘上的键在DEIPHI中应该怎么表示出来,如回车是#13,空格是#8,其他的呢?如果小数点,问号等。
解决方案 »
- 请问delphi有没有什么辅助工具可以看程序哪个函数或线程cpu的占用率?
- 请教:如何使用ACM中的Microsoft G.723.1压缩解压缩语音数据?
- MDAC 与ADO是什么关系?一个ADODataSet如何保存到ADOConnection连接的数据库库中去
- 大家是否可以讨论一下关于中间层的 “业务逻辑”。
- 问一个函数
- 实时采集数据的问题-急急!!
- XP和win7系统使用
- 大家有没有碰到过执行循环语句时不执行循环体内的,而是循环执上For语句上前两句?靠,好多奇怪的问题?
- 继承tobject的类能不能生成构件
- 请指教怎样才能完成一个程序的自我复制(向病毒那样的)
- 给大家一首好歌~
- 新写的程序,帮忙测试,谢谢!
建议用MaskEdit来代替, 不用写代码, 只要把EditMask设为###.###.###.###;1;
2. 键盘上的键在DEIPHI中应该怎么表示出来.
在KeyDown事件中写如下代码:
showmessage(inttostr(key));
showmessage(Inttostr(ord(key)));
MaskEdit是什么?在哪?我初学不懂,能告诉我吗?
我的QQ:2090450
加加加加加我
var
ipEdit: hwnd;
ipaddress: integer;begin
InitCommonControl(ICC_INTERNET_CLASSES);
ipEdit := CreateWindow(WC_IPADDRESS,nil,WS_CHILD or WS_VISIBLE,10,50,130,23,self.Handle,0,hInstance,nil);
end;