POLIK: Fatal error: Zugriff verweigert

[Pure_Beginner]

Hallo zusammen,

war gerade am herumexperimentieren mit Strukturen.

Code: Alles auswählen

EnableExplicit

Structure Namen
  name.s
  vorname.s
  alter.i
EndStructure


Define Namensliste.Namen



Procedure verarbeite(vorname$,name$,Alter.i)
  Shared Namensliste.Namen 
  
  With Namensliste    
    \name = name$
    \vorname = vorname$
    \alter = Alter
  EndWith 
EndProcedure


Procedure main()       
  verarbeite("Max","Mustermann",41)  
  
  Shared Namensliste.Namen   
  
  Debug Namensliste\name
  Debug Namensliste\vorname
  Debug Namensliste\alter
  
  ClearStructure(Namensliste, Namen) 
  
EndProcedure


main()  
Debug Namensliste\name           
Debug Namensliste\vorname
Debug Namensliste\alter

was vorher funktionierte löst jetzt einen Fehler aus.

Hat jemand eine Idee ?

Grüße
Christian

[ts-soft]

Windows Defender, Microsoft Security Essentials, Avira-Antivirus usw.

[NicTheQuick]

Schön wäre auch zu wissen welcher Fehler da kommt. Weil hier gibt's keine Probleme.
Zudem fehlt die Information, was "vorher" bedeutet.

[Pure_Beginner]

@NicTheQuick
Fehlermeldung steht in der Überschrift.
Vor dem letzen Booten.

@ts-soft
Bitdefender
hatte schon alles deaktiviert inkl. Firewall leider ohne Erfolg

[Pure_Beginner]

@all

nach Neustart keinerlei Probleme mehr.

Besten Dank an alle

Grüße
Christian