Информатика. Программирование в Delphi
          
        
        
          
            92
          
        
        
          ',','.':
        
        
          begin
        
        
          key:=DecimalSeparator;
        
        
          if pos(key,Edit2.Text)<>0 then
        
        
          key:=#0
        
        
          end
        
        
          else
        
        
          key:=#0;
        
        
          end;
        
        
          end;
        
        
          end.
        
        
          11. До сих пор мы не сохраняли проекта, хотя это очень важная операция,
        
        
          если мы собираемся дальше работать над проектом или эксплуатировать при-
        
        
          ложение. Сохранить весь проект можно одним из трех способов:
        
        
          −
        
        
          выполнив команду
        
        
          
            File→Save All;
          
        
        
          −
        
        
          набрав комбинацию клавиш на клавиатуре
        
        
          
            Shift+Ctrl+S;
          
        
        
          −
        
        
          нажав кнопку
        
        
          
            Save All
          
        
        
          на панели инструментов.
        
        
          Кнопка
        
        
          
            Save All
          
        
        
          на панели инструментов обведена кружком (рис. 5.14).
        
        
          Рис. 5.14
        
        
          Появится диалоговое окно
        
        
          
            Save Unit As
          
        
        
          −
        
        
          
            Сохранить модуль как
          
        
        
          для
        
        
          сохранения модуля программы (рис. 5.15).
        
        
          Рис. 5.15