简单的问题(100分)

笨

笨猪

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #1

怎样控制edit的输入格式（例如：我要用户输入的格式是这样的：＃9306,当用户输入时
前面没有＃号，则给予提示，怎样做？）

 

嘀

嘀嗒

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #2

可在onchange事件中写：
If Copy(Edit1.Text,1,1) <> '#' then
Showmessage('格式错误！');

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #3

edit1.text:='#'
先付上去

 

S

stuwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #4

用MaskEdit

 

P

pengjinlongex

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #5

可在onexit事件中写：
If Edit1.Text[1] <> '#' then
Showmessage('格式错误！');