首页
社区
课程
招聘
[旧帖] 高手给看下这两句什么意思(delphi) 0.00雪花
发表于: 2011-3-30 14:39 3379

[旧帖] 高手给看下这两句什么意思(delphi) 0.00雪花

2011-3-30 14:39
3379
我是新学的,我在写一个按钮,
procedure FormCreate(Sender: TObject);
……
procedure TForm1.FormCreate(Sender: TObject);
这个是我写的,但是在delphi里,点绿按钮(就是运行\F9),一运行就有反应,但等桌面出来程序上的按钮,怎么按都没反映。所以我找了教程,发现一共2句不一样,就是教程里的上面2句是:
procedure Button1Click(Sender: TObject);
……
procedure TForm1.Button1Click(Sender: TObject);
请问各位高手。有什么区别吗?都分别是什么意思?谢谢了。为了方便大家给解答,下面是我程序里的全部代码。
unit main;

interface

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

type
   TForm1 = class(TForm)
     Button1: TButton;
     procedure FormCreate(Sender: TObject);
   private
     { Private declarations }
   public
     { Public declarations }
   end;

var
   Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
start;
end;

end.

高手帮忙了。。谢谢了先

[培训]《安卓高级研修班(网课)》月薪三万计划,掌握调试、分析还原ollvm、vmp的方法,定制art虚拟机自动化脱壳的方法

收藏
免费 1
支持
分享
最新回复 (4)
雪    币: 36
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
这个是窗体创建的时候的事件,你要放在按键的ONCLICK时间里写
2011-3-30 15:00
0
雪    币: 21
活跃值: (11)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
  public
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
  start;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  start;
end;
end.

这样你创建窗体或者点按钮就都会有反应了
2011-3-30 17:21
0
雪    币: 47
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
应该是ONCLICK事件吧??
尽管我不喜欢DELPHI。但结构化编程在大体上大同小异。DELPHI的垃圾代码真烦人。只是一个简单的HELLO WORLD就要在资源里加什么星期几呀、一些图片什么的。根本没用!
2011-3-31 12:55
0
雪    币: 130
活跃值: (11)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
你要在你的控件属性那里定义事件的函数名。
不然就算你写了处理代码。控件也不会调用
2011-4-2 02:32
0
游客
登录 | 注册 方可回帖
返回
//