mainfrm.dfm

BMP存入xml文件中,同时也可以读出。包含两个实例

object FrmMain: TFrmMain
  Left = 164
  Top = 105
  ActiveControl = tvXML
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Streaming Image To XML'
  ClientHeight = 364
  ClientWidth = 571
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object imgRead: TImage
    Left = 366
    Top = 245
    Width = 193
    Height = 105
  end
  object imgToWrite: TImage
    Left = 366
    Top = 125
    Width = 193
    Height = 105
  end
  object bvlRead: TBevel
    Left = 366
    Top = 245
    Width = 193
    Height = 105
  end
  object bvlToWrite: TBevel
    Left = 366
    Top = 125
    Width = 193
    Height = 105
  end
  object lsbFile: TListBox
    Left = 11
    Top = 14
    Width = 548
    Height = 97
    ItemHeight = 13
    TabOrder = 0
  end
  object btnOpenBMP: TButton
    Left = 11
    Top = 124
    Width = 105
    Height = 25
    Caption = 'Open &BMP'
    TabOrder = 1
    OnClick = btnOpenBMPClick
  end
  object btnSaveToXML: TButton
    Left = 129
    Top = 124
    Width = 105
    Height = 25
    Caption = '&SaveToXML'
    TabOrder = 2
    OnClick = btnSaveToXMLClick
  end
  object btnOpenXML: TButton
    Left = 247
    Top = 124
    Width = 105
    Height = 25
    Caption = 'Open &XML'
    TabOrder = 3
    OnClick = btnOpenXMLClick
  end
  object tvXML: TTreeView
    Left = 11
    Top = 162
    Width = 341
    Height = 189
    Indent = 19
    ReadOnly = True
    TabOrder = 4
    OnChange = tvXMLChange
  end
  object dlgOpen: TOpenDialog
    Left = 13
    Top = 16
  end
  object dlgSave: TSaveDialog
    Left = 41
    Top = 16
  end
end