让TEdit控件的内容居中或右对齐,限制位数,仅允许输入数字。
摘要:SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE)orES_CENTER);Edit1.Invalidate; //如果右对齐,将ES_CENTER变成ES_RIGHT//(转自http://blog.csdn.net/wudi_1982/article/details/1205472)//限制输入位数为2Edit1.MaxLength := 2;//只允许输入数字procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begi
阅读全文
posted @
2012-12-20 13:48
曼波
阅读(580)
推荐(0)