如何使用MaskEdit做一個16位必填的數字且不出現 ____ |
答題得分者是:shinjie
|
Angi
一般會員 ![]() ![]() 發表:16 回覆:56 積分:14 註冊:2005-01-12 發送簡訊給我 |
|
shinjie
資深會員 ![]() ![]() ![]() ![]() ![]() 發表:12 回覆:275 積分:287 註冊:2003-03-19 發送簡訊給我 |
|
Angi
一般會員 ![]() ![]() 發表:16 回覆:56 積分:14 註冊:2005-01-12 發送簡訊給我 |
|
deity
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
|
Angi
一般會員 ![]() ![]() 發表:16 回覆:56 積分:14 註冊:2005-01-12 發送簡訊給我 |
|
deity
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
引言: 可是我的需求就是十位數字 Edit應該不可能辦到吧 曾經想過使用onClick,當onClick的時候,將欄位清空 但是這樣每key一個數字,就會被清空一次,根本無法輸入 實在想不出還有什麼方法了... |
Angi
一般會員 ![]() ![]() 發表:16 回覆:56 積分:14 註冊:2005-01-12 發送簡訊給我 |
引言 edit是可以办到的,小弟试了下 procedure TForm1.FormCreate(Sender: TObject);
begin
MaskEdit1.EditText:=' '; //这里空十格,MaskEdit1也能实现
Edit1.MaxLength:=10;//限制输入的位数
Edit1.Text:='';
end;
两种方式都可以达到您的要求,试试看 不好意思..還是不行也..不知是不是我不了解你的意思 Edit1.MaxLength:=10;//限制输入的位数
Edit1.Text:=''; 應該是設定Edit1為十位數,而且預設值為''
但我要的是只能key數字的,所以應該不行吧! 至於
MaskEdit1.EditText:=' '; //这里空十格,MaskEdit1也能实现 雖然是會清空沒錯,但是卻被鎖定在第一個位子,就好像只有一位的長度一樣
|
shinjie
資深會員 ![]() ![]() ![]() ![]() ![]() 發表:12 回覆:275 積分:287 註冊:2003-03-19 發送簡訊給我 |
|
Angi
一般會員 ![]() ![]() 發表:16 回覆:56 積分:14 註冊:2005-01-12 發送簡訊給我 |
|
deity
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
引言: 引言 edit是可以办到的,小弟试了下 procedure TForm1.FormCreate(Sender: TObject); begin MaskEdit1.EditText:=' '; //这里空十格,MaskEdit1也能实现 Edit1.MaxLength:=10;//限制输入的位数 Edit1.Text:=''; end; 两种方式都可以达到您的要求,试试看 不好意思..還是不行也..不知是不是我不了解你的意思 Edit1.MaxLength:=10;//限制输入的位数 Edit1.Text:=''; 應該是設定Edit1為十位數,而且預設值為''确良 没错 但我要的是只能key數字的,所以應該不行吧! 搞了半天原来您想要的这个,和您题目不符也,还是我的理解真的出了问题~~~静心养德~~~ |
shinjie
資深會員 ![]() ![]() ![]() ![]() ![]() 發表:12 回覆:275 積分:287 註冊:2003-03-19 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |