delphi变量怎么使用?
比如单击button1的时候计数count=0在edit1文本框中按回车也就是在事件Edit1KeyPress代码中使得count=1,按回车一次加1重新单击button...
比如单击button1的时候 计数count=0
在edit1文本框中按回车
也就是在事件Edit1KeyPress 代码中使得count=1,按回车一次加1
重新单击button1的时候count又等于0
然后在edit1文本框中按回车使 得count=1,按回车一次加1
count 变量怎么使用才能全局变化? 展开
在edit1文本框中按回车
也就是在事件Edit1KeyPress 代码中使得count=1,按回车一次加1
重新单击button1的时候count又等于0
然后在edit1文本框中按回车使 得count=1,按回车一次加1
count 变量怎么使用才能全局变化? 展开
4个回答
展开全部
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
//注意看这里
count:integer ;
//结束,在窗口用的时候再进行数值的初始化即可。
//在窗体的oncreate事件中count := 0;
{ Public declarations }
end;
var
Form1: TForm1;
//这个地方也可以。而且这个地方的是在窗体外的,当窗体注销时工程如果还没结束,还会有。所以最好还是在上面那个地方声明吧。
implementation
{$R *.dfm}
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
//注意看这里
count:integer ;
//结束,在窗口用的时候再进行数值的初始化即可。
//在窗体的oncreate事件中count := 0;
{ Public declarations }
end;
var
Form1: TForm1;
//这个地方也可以。而且这个地方的是在窗体外的,当窗体注销时工程如果还没结束,还会有。所以最好还是在上面那个地方声明吧。
implementation
{$R *.dfm}
展开全部
在任何地方定义都可以只要,不要在procedure中定义这个count变量就行了
比如在type 上边写上 var count:integer;
比如在type 上边写上 var count:integer;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
搞清楚什么是全局变量,什么是局部变量就很容易解决你的问题.
好好看看基础书籍!
好好看看基础书籍!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
全局化就是在整个工程中都可以识别呗?
你可以这样写:
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
//注意看这里
count:integer ;
//结束,在窗口用的时候再进行数值的初始化即可。
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
不过还是建议你看看 比较基础的书籍或者多读读DEMO 。
祝你好运!
你可以这样写:
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
//注意看这里
count:integer ;
//结束,在窗口用的时候再进行数值的初始化即可。
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
不过还是建议你看看 比较基础的书籍或者多读读DEMO 。
祝你好运!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询