|
Hola de nuevo: lamento haber sido tan parco en mi pregunta.
Todo está en la misma unit. En realidad se trata de un sencillísimo proyecto con un formulario, un edit, un botón y poco más.
Trataré de mostrarlo gráficamente.
- En la sección public defino unas variables que yo quiero que sean globales:
public
numeng: integer;
dia, mes, anno: Word;
ok: boolean;
phantom: string;
- En el evento "OnMouseMove" del Formulario escribo esta pequeña porción de código. En este caso el compilador reconoce perfectamente la variable "numeng" y traga sin problemas. Este es sólo un ejemplo, pero hay más.
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
numeng := 0;
end;
- Sin embargo, si yo defino un procedimiento cualquiera, no me reconoce la misma variable "numeng". Esto lo he definido justo donde empieza la sección implementation
procedure suma;
begin
numeng := numeng + 1;
end;
En este caso el compilador indica
[Error] Unit1.pas(44): Undeclared identifier: 'numeng'
Renovando mi gratitud por las respuestas recibidas recibid un saludo.
|