Changeset 40 for trunk


Ignore:
Timestamp:
Oct 13, 2019, 5:51:49 PM (5 years ago)
Author:
chronos
Message:
  • Fixed: Hide AI menu item in Release mode.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UFormMain.pas

    r38 r40  
    114114  ToolsVisible := False;
    115115  for I := 0 to MenuItemTools.Count - 1 do
    116     if MenuItemTools.Items[I].Enabled then begin
     116    if MenuItemTools.Items[I].Visible then begin
    117117      ToolsVisible := True;
    118118      Break;
  • trunk/UCore.pas

    r36 r40  
    192192  {$IFDEF DEBUG}
    193193  AComputer.Enabled := True;
     194  AComputer.Visible := True;
    194195  {$ELSE}
    195196  AComputer.Enabled := False;
     197  AComputer.Visible := False;
    196198  {$ENDIF}
    197199end;
Note: See TracChangeset for help on using the changeset viewer.