Question

In a delphi unit, I have a global record called ‘Context’:

interface
  type
    TContext = record
       ...
    end;

  var
    context: TContext;

I also have a initialization procedure in this unit, taking a context:

interface  
  procedure Init(AContext: TContext);

Inside the Init procedure, I try to assign the given context to the global context:

implementation
  procedure Init(AContext: TContext);
  begin
    context := AContext;
  end;

For some reason, the global context remains empty after the assignment. Why is that?
Declaring a local variable inside the procedure, and assigning to it works as expected.

---

What I should have mentioned, is that this unit lives in a dll, and the init procedure is called from the exe.
Declaring a global record, or declaring several global strings makes no difference. The assigned values are lost.

regards,
-Vegar

Answer 1

The error is found. Everything was kind of a mess really…. It turned out that the object responsible for calling the init-method existed twice, and the unit containing the global variable existed both inside the dll and the exe project. For some reason, one of the instances of the calling class manipulated the global variable inside the exe and the other the one inside the dll, and both the developer and the debugger where tripped to a halt…

The code is part of some old, messy legacy code which we are trying to break apart and clean up. We really start to get the hang of the ‘breaking’-part…

Thanks for the responses, and sorry for wasting your time.

regards,
-Vegar