unit Unit1;interface
    procedure one;
    procedure two;
uses
  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;implementation{$R *.dfm}procedure tform1.two;
begin
  button1.caption:='你好吗?';
end;procedure tform1.one;
begin
  two;
end;procedure TForm1.Button1Click(Sender: TObject);
begin
 one;
end;end.
请问我的上面的两个过程声明的位置对吗?为什么?
另外,别人给我解决了问题我怎么去揭贴呀?????
很多人都给我提示了呀我好急呀?
别人解答了我的问题是应该得到报酬的呀?

解决方案 »

  1.   

    点击上边的管理,就可以给分了,不过要输入密码的,至于比较久远的帖子,可能打不开,就直接在csdn问题列表的右侧点击管理,就可以了
      

  2.   

    type
      TForm1 = class(TForm)
        Button1: TButton;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
        procedure one;
        procedure two;
        //这样更好,别的单元不能访问他的变量,属于私有的,你先去看看组件的编写,然后看看oop,就可以理解了,具体的delphi5开发人员指南上边写的也很清楚的,或者直接看delphi的vcl源代码
      public
        { Public declarations }
      end;