Delohi7程序谁帮我加解释我看不懂

unit unitFrmSplit;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls;

type
TfrmSplit = class(TForm)
pnlClient: TPanel;
pnlLeft: TPanel;
Splitter1: TSplitter;
procedure Splitter1CanResize(Sender: TObject; var NewSize: Integer;
var Accept: Boolean);
procedure pnlLeftClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
frmSplit: TfrmSplit;

implementation

{$R *.dfm}

procedure TfrmSplit.Splitter1CanResize(Sender: TObject;
var NewSize: Integer; var Accept: Boolean);
begin
if (NewSize<150) or (NewSize>300) then
Accept:=false;
end;

procedure TfrmSplit.pnlLeftClick(Sender: TObject);
begin

TfrmSplit = class(TForm)
pnlClient: TPanel;
pnlLeft: TPanel;
Splitter1: TSplitter; //上面定义了几个对象
procedure Splitter1CanResize(Sender: TObject; var NewSize: Integer;
var Accept: Boolean);
procedure pnlLeftClick(Sender: TObject);
procedure FormCreate(Sender: TObject); //上面定义了几个过程

procedure TfrmSplit.Splitter1CanResize(Sender: TObject;
var NewSize: Integer; var Accept: Boolean); //给刚才定义的过程添加代码
begin
if (NewSize<150) or (NewSize>300) then //如果newsize 满足这2个条件
Accept:=false; //值为假
end;

procedure TfrmSplit.pnlLeftClick(Sender: TObject); //空过程
begin

end;

procedure TfrmSplit.FormCreate(Sender: TObject); //空过程
begin

end;

Delohi7程序谁帮我加解释我看不懂 谁帮我解释下程序烧的原理 谁能一句一句帮我解释VB程序 帮我解释ASP这个程序 帮我解释下c#程序 请帮我解释一个程序 几个程序解释，大家帮我一下~` 请帮我解释这个程序 请帮我解释VB程序 请帮我解释下VB程序