Chip 1999 January/Chip_1999-01_cd.bin/zkuste/delphi/QDB/QDBG.ZIP/QDBGEdt.dfm/QDBGEdt.txt

Text File | 1998-07-29 | 7.3 KB | 301 lines

object QDBGridEditDlg: TQDBGridEditDlg
  Left = 252
  Top = 152
  Width = 737
  Height = 222
  Caption = 'QDBGridEditDlg'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object CancelButton: TButton
    Left = 624
    Top = 32
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object OKButton: TButton
    Left = 624
    Top = 80
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object QDBGrid: TQDBGrid
    Left = 0
    Top = 0
    Width = 593
    Height = 195
    Align = alLeft
    Columns = <
      item
      end
      item
      end
      item
      end
      item
      end
      item
      end>
    DisplayThumbnails = False
    MatchRowHeightToFont = False
    TabOrder = 2
    TabStop = True
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnMouseDown = QDBGridMouseDown
    ColCount = (
      5)
    ColWidths = (
      15
      64
      64
      64
      64)
  end
  object PopupMenu1: TPopupMenu
    AutoPopup = False
    Left = 600
    Top = 136
    object ColumnMenu: TMenuItem
      Caption = 'Column'
      ShortCut = 0
      object ColumnButtonStyleMenu: TMenuItem
        Caption = 'Button Style'
        ShortCut = 0
        OnClick = ColumnButtonStyleMenuClick
        object ColumnButtonStyleAuto: TMenuItem
          Caption = 'Auto'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnButtonStyleItemsClick
        end
        object ColumnButtonStyleButtonsis: TMenuItem
          Caption = 'Button'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnButtonStyleItemsClick
        end
        object ColumnButtonStyleNone: TMenuItem
          Caption = 'None'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnButtonStyleItemsClick
        end
      end
      object ColumnFieldTypeMenu: TMenuItem
        Caption = 'Field Type'
        ShortCut = 0
        OnClick = ColumnFieldTypeMenuClick
        object esSinple1: TMenuItem
          Caption = 'integer'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object integers1: TMenuItem
          Caption = 'integers'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object esMemo1: TMenuItem
          Caption = 'real'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object e1: TMenuItem
          Caption = 'boolean'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object datetime1: TMenuItem
          Caption = 'datetime'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object string1: TMenuItem
          Caption = 'string'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object strings1: TMenuItem
          Caption = 'strings'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object richstrings1: TMenuItem
          Caption = 'richstrings'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object graphic1: TMenuItem
          Caption = 'graphic'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object thing1: TMenuItem
          Caption = 'thing'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object date1: TMenuItem
          Caption = 'date'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ColumnFieldTypeItemClick
        end
        object time1: TMenuItem
          Caption = 'time'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
        end
      end
      object ColumnReadOnlyMenu: TMenuItem
        Caption = 'Read Only'
        ShortCut = 0
        OnClick = ColumnReadOnlyMenuClick
        object Editable1: TMenuItem
          Caption = 'Editable'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ReadOnlyItemClick
        end
        object Readoly1: TMenuItem
          Caption = 'Read Only'
          GroupIndex = 1
          RadioItem = True
          ShortCut = 0
          OnClick = ReadOnlyItemClick
        end
      end
    end
    object TitleMenu: TMenuItem
      Caption = 'Title'
      ShortCut = 0
      object TitleAlignmentMenu: TMenuItem
        Caption = 'Alignment'
        ShortCut = 0
        OnClick = TitleAlignmentMenuClick
        object Left1: TMenuItem
          Caption = 'Left'
          RadioItem = True
          ShortCut = 0
          OnClick = TitleAlignmentItemClick
        end
        object Right1: TMenuItem
          Caption = 'Right'
          RadioItem = True
          ShortCut = 0
          OnClick = TitleAlignmentItemClick
        end
        object Center1: TMenuItem
          Caption = 'Center'
          RadioItem = True
          ShortCut = 0
          OnClick = TitleAlignmentItemClick
        end
      end
      object TitleCaptionMenu: TMenuItem
        Caption = 'Caption...'
        ShortCut = 0
        OnClick = TitleCaptionMenuClick
      end
      object TitleFontMenu: TMenuItem
        Caption = 'Font...'
        ShortCut = 0
        OnClick = TitleFontMenuClick
      end
    end
    object CellsMenu: TMenuItem
      Caption = 'Cells'
      ShortCut = 0
      object CellAlignmentMenu: TMenuItem
        Caption = 'Alignment'
        ShortCut = 0
        OnClick = CellAlignmentMenuClick
        object Left2: TMenuItem
          Caption = 'Left'
          RadioItem = True
          ShortCut = 0
          OnClick = AlignmentItemClick
        end
        object Right2: TMenuItem
          Caption = 'Right'
          RadioItem = True
          ShortCut = 0
          OnClick = AlignmentItemClick
        end
        object Center2: TMenuItem
          Caption = 'Center'
          RadioItem = True
          ShortCut = 0
          OnClick = AlignmentItemClick
        end
      end
      object CellColorMenu: TMenuItem
        Caption = 'Color...'
        ShortCut = 0
        OnClick = CellColorMenuClick
      end
      object CellFontMenu: TMenuItem
        Caption = 'Font...'
        ShortCut = 0
        OnClick = CellFontMenuClick
      end
    end
  end
  object FontDialog: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 680
    Top = 136
  end
  object ColorDialog: TColorDialog
    Ctl3D = True
    Left = 640
    Top = 136
  end
end