Hola negama
El error está en que llamas a una variable de tipo "procedure" que no está asignada.
procedure Tcheca();
begin
agregar(); // **** aqui quiero llamar al otro procedure***
end;
para llamar correctamente tedrías que hacer:
procedure Tcheca();
begin
// asignar la variable
agregar := Tagregar;
// Ahora se puede llamar
agregar();
end;
También deberá estar declarado el procedimiento Tagregar antes de esa asignación.
SalU2
__________________
Una cosa es una cosa, y otra cosa es otra cosa...
|