Jak zabezpieczyć zmiennej przed dostępem?

0

Witam.

Potrzebuje zabezpieczyć zmienną globalną przed jednoczesnym dostępem z różnych watków. Zastosowałem klasę TCriticalSection w taki sposób:

var
            blokada : TCriticalSection;
            zmienna_globalna : integer;
       . . . . .

       Procedure;
       begin

            Blokada.Acquire; 
            try
                 zmienna_globalna:=10;

            finally 
                 blokada.Release; 
            end;

           . . .

Problem w tym że wyskakuje błąd nieprawidłowego dostępu do pamięci.
Jak poprawnie zabezpieczyć zmienną?

Z góry dziękuje za pomoc.

0

A masz gdzieś coś takiego:

Blokada:=TCriticalSection.Create;
0

Dzięki. Podziałało.

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0