prinzipiell gilt hier "neue frage neuer thread"
nichtsdestotrotz, was hindert dich daran dich folgenden konstruktes zu bedienen?
Delphi-Quellcode:
var Ich_Bin_Global: Integer = 0;
function Foo(Bar: Integer): Integer;
begin
Ich_Bin_Global := Bar;
...
Result := Tu_Was(...);
end;