delphi分为过程和函数:
delphi 过程以保留字procedure开始,没有返回值;函数以保留字function开始,有返回值。
一: 过程的框架:
Procedure 过程名([形参列表])// 参数可选
var
//声明常量、变量或另一个过程或函数等
begin
语句;
end;
界面如图所示:
运行前:
代码如下:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
procedure Myproc(Str: String);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);