startword.dfm

在Delphi中操作word的例子

object Form1: TForm1
  Left = 192
  Top = 107
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #21551#21160'WORD'#20363#23376
  ClientHeight = 209
  ClientWidth = 161
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 8
    Top = 8
    Width = 145
    Height = 25
    Caption = #21551#21160'Word'
    TabOrder = 0
    OnClick = Button1Click
  end
  object CheckBox1: TCheckBox
    Left = 0
    Top = 40
    Width = 161
    Height = 17
    Caption = #26174#31034'Word'#31383#21475
    Checked = True
    State = cbChecked
    TabOrder = 1
  end
  object ListBox1: TListBox
    Left = 0
    Top = 112
    Width = 161
    Height = 97
    ItemHeight = 13
    TabOrder = 2
  end
  object CheckBox2: TCheckBox
    Left = 0
    Top = 64
    Width = 161
    Height = 17
    Caption = #25171#21360#39044#35272
    TabOrder = 3
  end
  object CheckBox3: TCheckBox
    Left = 0
    Top = 88
    Width = 161
    Height = 17
    Caption = #25171#21360
    TabOrder = 4
  end
  object wordApp: TWordApplication
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    AutoQuit = False
    Left = 128
    Top = 40
  end
end