Czy pisząc taką procedurę popełniam jakiś błąd????
procedure Tzamykanie.Timer1Timer(Sender: TObject);
var
I : Integer= 30;
begin
Label1.Caption := 'Do zakończenia programu pozostało: ' + IntToStr(I);
Dec(i);
if I = 0 then
zamykanie.Close;
end;
end;
U mnie program nie chce się skompilować i wyskakuje: [Error] Unit1.pas(29): Cannot initialize local variables
pomóżcie