How can I use a procedure in delphi?(50分)

L

linyuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #1

for example, I have created a procedure in delphi
and I want use a button to call it.
How can I compelte this?
becasue I can't put the whole procedure in the button onclick
event between "begin
and end"
"gelugaoshou", kindly show me.

 

S

Schiesser

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #2

在onclick中调用不就得了?

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #3

1.first, define your procedure :
procedure <font color=red>abc</font>;
begin
//do something ....
end;

2.then
, put this code into the OnClick event:
procedure tform1.button1Click(sender:tobject);
begin
<font color=red>abc</font>;
end;

 

K

kchsun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #4

简单，如要创建a过程下：
type
procedure a();//在type中添加声明
.......
implementation
{$R *.DFM}
procedure form1.a();
begin
.....
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
a;//调用过程a
..........
end;

 

C

cytown

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #5

还可以:
procedure TForm1.Button1Click(Sender: TObject);
procedure a();
begin
.....
end;
begin
a;//调用过程a
..........
end;

 

L

linyuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-10-19

• #6

多人接受答案了。