初學者(50分)

G

ginwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-10

• #1

請問一下如果使用delphi的tab order是否一定只能用tab鍵跳到下一個欄位...難道不能用ender或是右鍵嗎？[]

代码:

 

S

sunmengchun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-10

• #2

虚拟就可以了，捕捉到你想用的按键，然后触发TAB就行了

 

D

duhai_lee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-10

• #3

我是在窗体的KEYPRESS 事件里写代码的，
若为回车则跳入下一个控件

 

墨

墨剑

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-10

• #4

首先，你先按顺序设号taborder属性，然后设置form的keypreview属性=true,最后在form
的onKeyPress事件中写代码如下
procedure Tform1.FormKeyPress(Sender: TObject;
var Key: Char);
begin
if (Sender is Tform) then
if key=#13 then
begin
SendMessage(Self.Handle, WM_NEXTDLGCTL, 0, 0);
Key := #0;
end;
end;

 

O

oldsheep35

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-11

• #5

楼上忘了说的我补充：
Form的keypriview ：＝ True；

 

G

ginwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-12

• #6

一定得寫入代碼的嗎？不能向vfp一樣雖然是tab可是按enter一樣可以喔？...虛擬是什麼意思勒？這種方法是不是就不用寫代碼了?3q~~[?]

 

D

DwSoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-12

• #7

你可以用继承的方法来做,先做自己的一个TFrom 类做一个以上的代码就行啦!!

 

吕

吕洞宾

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-12

• #8

简单:
首先，你先按顺序设号taborder属性，然后设置form的keypreview属性=true,最后在form
的onKeyPress事件中写代码如下
procedure Tform1.FormKeyPress(Sender: TObject;
var Key: Char);
begin
if key=#13 then
selectnext(activecontrol,true,true)
end;
搞定

 

O

oldsheep35

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-12

• #9

to楼主
一定得写代码！
这楼上的几种方法应该是最简单的了！

 

G

ginwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-13

• #10

呵呵～謝謝各位...成功了耶^O^

 

O

oldsheep35

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-13

• #11

那论坛能给分的时候就要记得给分了！

 

G

ginwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-10-29

• #12

多人接受答案了。