filestreamfrm.~dfm

关于利用DELPHI来进行企业级方案解决的著作的附书源码

object fsForm: TfsForm
  Left = 318
  Top = 177
  Width = 390
  Height = 317
  Caption = #36816#29992#25991#20214#27969#23545#35937#20445#23384#31383#20307#24067#23616#28436#31034
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnMouseDown = FormMouseDown
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 382
    Height = 29
    ButtonHeight = 21
    ButtonWidth = 31
    Caption = 'ToolBar1'
    ShowCaptions = True
    TabOrder = 0
    object NewButton: TToolButton
      Left = 0
      Top = 2
      Caption = #26032#24314
      ImageIndex = 0
      OnClick = NewButtonClick
    end
    object SaveButton: TToolButton
      Left = 31
      Top = 2
      Caption = #20445#23384
      ImageIndex = 1
      OnClick = SaveButtonClick
    end
    object OpenButton: TToolButton
      Left = 62
      Top = 2
      Caption = #25171#24320
      ImageIndex = 2
      OnClick = OpenButtonClick
    end
    object ExitButton: TToolButton
      Left = 93
      Top = 2
      Caption = #36864#20986
      ImageIndex = 3
      OnClick = ExitButtonClick
    end
    object ToolButton5: TToolButton
      Left = 124
      Top = 2
      Width = 69
      Caption = 'ToolButton5'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object ButtonRadio: TRadioButton
      Left = 193
      Top = 2
      Width = 56
      Height = 21
      Caption = #25353#38062
      TabOrder = 0
      OnClick = ButtonRadioClick
    end
    object LabelRadio: TRadioButton
      Left = 249
      Top = 2
      Width = 56
      Height = 21
      Caption = #26631#31614
      TabOrder = 1
      OnClick = LabelRadioClick
    end
    object EditRadio: TRadioButton
      Left = 305
      Top = 2
      Width = 64
      Height = 21
      Caption = #32534#36753#26694
      TabOrder = 2
      OnClick = EditRadioClick
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = #25991#20214#27969#25991#20214'(*.fs)|*.fs'
    Left = 168
    Top = 144
  end
  object SaveDialog1: TSaveDialog
    Filter = #25991#20214#27969#25991#20214'(*.fs)|*.fs'
    Left = 224
    Top = 144
  end
end