怎样定义自己的过程和函数?
怎样调用他们?

解决方案 »

  1.   

    看Delphi帮助吧,输入function 或procedure
      

  2.   

    随便在DELPHI安装目录下找个.PAS,里面的函数\过程怎么做的你就怎么做啊,我开始就是这样的,还可以学到不少的东西哦
      

  3.   

    如: 
      ... 
      private
        { Private declarations }
        procedure Show;
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Show;
    begin
      ShowMessage('ShowMessage');
    end;procedure TForm1.Button1Click(Sender: TObject);
    begin
      Show;
    end;end.
      

  4.   

    有一点要注意,如果没在前面声名的方法,即不属于某个form的方法,要先定义在使用如
    procedure show;
    begin
    {}
    end;某个程序当中
    ...
    show;
    ...如果反过来

    某个程序当中
    ...
    show;
    ...

    procedure show;
    begin
    {}
    end
    则会报错