新建模块的格式 -

新建模块的格式 - 在线等
自定义的函数，不想写在Form1的pas文件里，所以新建了一个Unit，格式如下
unit Unit2;

interface

implementation

end.

请问怎样定义过程和函数，格式怎么写？
新手入门。不胜感激！

^_^

[解决办法]
在
interface

implementation之间定义函数，然后在
implementation

end.写函数体
[解决办法]
Unit2的内容

Delphi(Pascal) code

unit Unit2;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs;procedure SetFormCaption(aForm: TForm; aCaption: string);implementationprocedure SetFormCaption(aForm: TForm; aCaption: string);begin  aForm.Caption := aCaption;end;end.
[解决办法]
Unit1来调用
Delphi(Pascal) code
unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;type  TForm1 = class(TForm)    Button1: TButton;    procedure Button1Click(Sender: TObject);  private    { Private declarations }  public    { Public declarations }  end;var  Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin  SetFormCaption(Self, '窗口标题');end;end.