Hi Frank,
ich kann allerdings Dein Problem nicht reproduzieren, hab das mal mit Booleans und mit Integern probiert, und bei mir gibt es keine Prozedurübergreifende Beeinflussung.
Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
const hallo : integer =2;
testbool :Boolean=true;
begin
hallo := hallo+1;
ShowMessage(inttostr(hallo));
testbool := NOT testbool;
showmessage(BoolToStr(testbool,true));
end;
procedure TForm1.Button6Click(Sender: TObject);
const hallo : integer =2;
testbool :Boolean=true;
begin
hallo := hallo+1;
ShowMessage(inttostr(hallo));
showmessage(BoolToStr(testbool,true));
end;
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]