如何在自写的过程中调用edit.onkeyup()事件? ( 积分: 100 )

W

wangny

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-14

• #1

如何在自写的过程中调用edit.onkeyup()事件?
比如在按扭按下时要调用edit1keyup()事件
代码如下:
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Edit1KeyUp(sender: TObject);
end;

不能通过,给出的错误提示:no enough actual parameters

 

D

danng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-14

• #2

procedure TForm1.btn1Click(Sender: TObject);
var
MyKey:Word;
begin
MyKey:=65
//字母A
edt1KeyUp(edt1,MyKey,[ssShift]);
end;
参数跟据你自己的要求填

 

W

wangny

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-14

• #3

我没有具体的参数要填呀,只是一个过程调用的.在KEYUP里我没有用到什么参数

 

L

liyinwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-14

• #4

var
s: Word;
begin
Edit1KeyUp(nil,s,[]);
end;

如果你不需要用到参数，那么传什么进去都没有关系，
但是调用函数就要根据函数定义的格式去调用，并不是你不用参数就可以不传的。

 

银

银雨辰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-14

• #5

var
MyKey:Word;
begin
MyKey:=65
//字母A
Edit1.OnKeyUp(edt1,MyKey,[ssShift]);
//或者 Edit1.OnKeyUp(Nil,MyKey,[ssShift]);
end;

 

W

wangny

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-12-15

• #6

谢谢danng和liyinwei两位，我在提问时没说明无参数要求，各加五十分，同时也感谢银雨辰！