Changeset 152 for trunk/Forms/FormOutput.pas
- Timestamp:
- Jun 6, 2024, 9:10:15 PM (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/FormOutput.pas
r149 r152 24 24 25 25 uses 26 Core, TargetInterpret ter;26 Core, TargetInterpreter; 27 27 28 28 { TFormOutput } … … 30 30 procedure TFormOutput.Reload; 31 31 begin 32 if Core.Core.CurrentTarget is TTargetInterpret ter then33 with TTargetInterpret ter(Core.Core.CurrentTarget) do begin32 if Core.Core.CurrentTarget is TTargetInterpreter then 33 with TTargetInterpreter(Core.Core.CurrentTarget) do begin 34 34 if OutputChanged then begin 35 35 OutputChanged := False;
Note:
See TracChangeset
for help on using the changeset viewer.