On 27/09/2012 16:10, ik wrote:
Hello,

Is there a way to create a static variable inside a procedure ?
The following code:

procedure static_variable;
var static_var : Integer = -1;

const
  static_var: integer = 1;


begin
   inc(static_var);
   writeln('static_var ', static_var);
end;




_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to