Auswertung Lokale Variablen unvollständig

[BerndS]

In diesem Beispiel klappt es sowohl in der lokalen Prozedur ShowValues als auch in der anonymen im TTast.Run mit D11.1 wenn man mit der Maus rüber geht oder diese im den überwachten Ausdrücken hinzufügt.

Delphi-Quellcode:

procedure TForm1.bt1Click(Sender: TObject);
var
  S1, S2: string;
  B: Byte;
  I: Integer;
  procedure ShowValues;
  var
    S: string;
  begin
    S := S1 + #32 + S2 + #32 + B.ToString + #32 + I.ToString;
    OutputDebugString(PChar(S));
  end;
begin
  S1 := 'S1';
  S2 := 'S2';
  B := 255;
  I := B *100;
  ShowValues;
  TTask.Run( procedure
  var
    S: string;
  begin
    S := S1 + #32 + S2 + #32 + B.ToString + #32 + I.ToString;
    OutputDebugString(PChar(S));
  end);

Aber mit 10.4.2 sind S1 usw. nur im TTask.Run sichtbar.