Ayuda con Variables Globales y Locales en Pascal

[ecfisa]

Hola Novatin.

Te pongo un código de ejemplo que te puede clarificar el ámbito de las variables en Pascal:

Código Delphi [-]
...
var
  varGlobal: Integer; // Global

function Funcion: Integer;
var
  Local: Integer; // Local a la función
begin
  varGlobal := 10; // Correcto
  Local     := 5;  // Correcto obviamente
  varLocal  := 10; // ¡¡ Error !! no accecible por Funcion
  Funcion   := Local;
end;

var
  varLocal: Integer; // Local a main, desconocida por todo el código que está encima.
                     // A diferencia de C/C++, Pascal no permite la inclusión de código 
                     // despues de finalizado el cuerpo principal del programa (.)
begin
  varGlobal := 10;  // Correcto
  varLocal  := 10;  // Correcto obviamente
  Local     := 15;  // ¡¡ Error !! no accesible
  WriteLn(varGlobal+varLocal);
  Readln;
end.

En el caso que utilices unidades, las variables declaradas en la sección de interface serán accesibles desde cualquier otra unidad que las incluya y las declaradas en la sección de implementation, privadas a la unidad.

Saludos.