初学者的问题

有这样一个formgreat事件程序

var
i,g:integer;

begin
for i:=1 to 10 do
begin
.....
....
end

for g:=1 to 10 do /为何在此处报错，编译不能通过
begin
....
end
end;
本人刚从vb转学delphi，请勿见笑，还请各位大虾教小弟