Высокоуровневые методы информатики и программирования. Сивохин А.В - 121 стр.

        Font.Style = [fsBold, fsItalic]
        ParentFont = False
       end
       object OutLabel: TLabel
        Left = 112
        Top = 384
        Width = 202
        Height = 22
        Caption                                                           =
#1056#1077#1079#1091#1083#1100#1090#1080#1088#1091#1102#1097#1080#1081'
'#1084#1072#1089#1089#1080#1074
        Font.Charset = RUSSIAN_CHARSET
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'Monotype Corsiva'
        Font.Style = [fsBold, fsItalic]
        ParentFont = False
       end
       object InStringGrid: TStringGrid
        Left = 8
        Top = 112
        Width = 409
        Height = 129
        ColCount = 16
        DefaultColWidth = 24
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine,
goRangeSelect, goEditing, goTabs]
        TabOrder = 0
        OnSelectCell = InStringGridSelectCell
        ColWidths = (
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24
         24)
       end
98