怎么获取FormActivate里定义的变量值
我是这样写的
procedure TzhuceForm.FormActivate(Sender: TObject);
var
i:integer;
aa:string;
begin
randomize;
i:=random(99)+1;
edit1.Text:=inttostr(i);
end;

然后我加了一个BitBtn1 我想在这里单击事件里 想得到上面那个i的数值
怎么写 等待 写详细 谢谢

[解决办法]
procedure TzhuceForm.FormActivate(Sender: TObject);
var
i:integer;
aa:string;
begin
randomize;
i:=random(99)+1;
self.tag:=inttostr(i);
end;