home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 October / Chip_2002-10_cd1.bin / zkuste / delphi / kolekce / d56 / FLEXCEL.ZIP / Demo / UFlDemoEdit.dfm < prev    next >
Encoding:
Text File  |  2002-06-14  |  1.6 KB  |  72 lines
  1. object DemoEdit: TDemoEdit
  2.   Left = 317
  3.   Top = 198
  4.   Width = 598
  5.   Height = 359
  6.   Caption = 'Editing Excel file'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object ToolBar: TToolBar
  17.     Left = 0
  18.     Top = 0
  19.     Width = 590
  20.     Height = 38
  21.     AutoSize = True
  22.     ButtonHeight = 36
  23.     ButtonWidth = 56
  24.     Caption = 'ToolBar'
  25.     DisabledImages = DemoData.ImageList2
  26.     Flat = True
  27.     HotImages = DemoData.ImageList3
  28.     Images = DemoData.ImageList1
  29.     ParentShowHint = False
  30.     ShowCaptions = True
  31.     ShowHint = True
  32.     TabOrder = 0
  33.     object BtnSave: TToolButton
  34.       Left = 0
  35.       Top = 0
  36.       Caption = 'Save As...'
  37.       ImageIndex = 2
  38.       OnClick = BtnSaveClick
  39.     end
  40.     object BtnClose: TToolButton
  41.       Left = 56
  42.       Top = 0
  43.       Caption = 'Close'
  44.       ImageIndex = 12
  45.       OnClick = BtnCloseClick
  46.     end
  47.   end
  48.   object TabControl: TTabControl
  49.     Left = 0
  50.     Top = 38
  51.     Width = 590
  52.     Height = 294
  53.     Align = alClient
  54.     TabOrder = 1
  55.     OnChange = TabControlChange
  56.     object Data: TStringGrid
  57.       Left = 4
  58.       Top = 6
  59.       Width = 582
  60.       Height = 284
  61.       Align = alClient
  62.       ColCount = 9
  63.       DefaultRowHeight = 18
  64.       RowCount = 15
  65.       Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goAlwaysShowEditor, goThumbTracking]
  66.       TabOrder = 0
  67.       OnDrawCell = DataDrawCell
  68.       OnSelectCell = DataSelectCell
  69.     end
  70.   end
  71. end
  72.