主题：[求教]如何在库中定义变量的处始值？
小田甜ts
[专家分：210] 发布于 2006-07-01 16:06:00
如何在自定义的库中定义变量的处始值？
回复列表 （共5个回复）
沙发
贺天行宝 [专家分：2300] 发布于 2006-07-02 13:52:00
听不懂啊
板凳
小田甜ts [专家分：210] 发布于 2006-07-02 19:12:00
比如:在
[quote]unit a;
interface
function i:byte;
implementation
var n:byte;
function i;
begin
if n=255 then n:=0 else n:=n+1;
i:=n;
end;
end.
[/quote]
中我想定义n的初始值为0,
又不想再写一个过程
[quote]procedure init;
begin
n:=0
end.
[/quote]
在调用他的程序开头写。
那我该怎么写?
谁能告诉我，谢谢!
3 楼
maxumi [专家分：2200] 发布于 2006-07-03 10:02:00
用CONST定义一个常量x=0, 在function中加一句n:=x;
4 楼
小田甜ts [专家分：210] 发布于 2006-07-07 14:42:00
[quote]在function中加一句n:=x;[/quote]能不能在我上面的那个unit里写一下？谢谢．
5 楼
maxumi [专家分：2200] 发布于 2006-07-10 08:50:00
unit a;
interface
function i:byte;
implementation
var n:byte;
function i;
const
x=0;
begin
n:=x;
if n=255 then n:=0 else n:=n+1;
i:=n;
end;
end.
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — [求教]如何在库中定义变量的处始值？