Информатика. Программирование в Delphi
          
        
        
          
            196
          
        
        
          13. Запустим приложение (рис. 14.3).
        
        
          Рис. 14.3
        
        
          Окончательный вариант приложения приведен в листинге 14.1. Коммен-
        
        
          тарии удалены.
        
        
          
            Листинг 14.1
          
        
        
          unit Unit1;
        
        
          interface
        
        
          uses
        
        
          Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dia-
        
        
          logs, StdCtrls, ExtCtrls;
        
        
          type
        
        
          TForm1 = class(TForm)
        
        
          //обявление компонентов
        
        
          Label1: TLabel;
        
        
          Edit1: TEdit;
        
        
          RadioGroup1: TRadioGroup;
        
        
          Image1: TImage;