如何使当一个EDIT框获得蕉点时，全选其中的内容？(50分)

还

还珠格格

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-13

• #1

如何使当一个EDIT框获得蕉点时，全选其中的内容？

 

飞

飞龙在天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-13

• #2

方法1：
将Edit的属性AutoSelect置为True

方法2：
在Edit的OnEnter事件中写 Edit1.SelectAll;

 

江

江维

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-13

• #3

同意楼上的兄弟！

 

Q

qdshen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-13

• #4

来晚了！！

 

M

micony

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-14

• #5

控件好象都有一个onActive。。。事件吧，就是控件获得焦点时发生的事件，
那么就可以在这事件里加入Edit1.SelectAll;了

 

L

luguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-14

• #6

格格按飞龙在天说的去做吧，没错。

 

B

blue girl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-30

• #7

寫以下的兩個事件就可以了
procedure TForm1.Edit1Enter(Sender: TObject);
begin
Edit1.SelectAll;
end;

procedure TForm1.Edit1MouseDown(Sender: TObject
Button: TMouseButton;
Shift: TShiftState
X, Y: Integer);
begin
Edit1.SelectAll;
end;

 

W

wlmmlw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-30

• #8

凑和着，给点分！

 

N

netCobra

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-30

• #9

没意见

 

N

nethree

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-30

• #10

今天我试了试，好像用.SetFocus也可以！

 

D

danliyou

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-14

• #11

SetFocus好象不行吧？？

 

S

sxbing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-15

• #12

SelectAll

 

P

progrand

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-15

• #13

with edit1 do
beign
setfocus;
selectall;
end;
d6 通过！

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-15

• #14

setfocuse 的确可以

 

S

shuizi2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-29

• #15

在WINDOWS2000中好像不行的！！！

 

M

mafan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-29

• #16

[red]blue girl正确，不论在9X还是2K，XP都行[/red]

 

F

f950436

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-29

• #17

将Edit的属性AutoSelect置为True
干吗搬石头上山