fmsstmain.dfm

Delphi开发webservice的一套例子

object Form1: TForm1
  Left = 163
  Top = 132
  Width = 492
  Height = 161
  Caption = #31532'9'#31456#31684#20363
  Color = clBtnFace
  Font.Charset = CHINESEBIG5_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #26032#32048#26126#39636
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 16
  object Label2: TLabel
    Left = 8
    Top = 3
    Width = 283
    Height = 21
    Caption = #30001'MS Soap Toolkit'#23458#25142#31471#21628#21483
    Font.Charset = CHINESEBIG5_CHARSET
    Font.Color = clRed
    Font.Height = -21
    Font.Name = #26032#32048#26126#39636
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label1: TLabel
    Left = 8
    Top = 33
    Width = 143
    Height = 16
    Caption = 'Web Service'#22238#20659#35338#24687
  end
  object edtMessage: TEdit
    Left = 8
    Top = 57
    Width = 465
    Height = 24
    TabOrder = 0
  end
  object BitBtn1: TBitBtn
    Left = 8
    Top = 89
    Width = 241
    Height = 33
    Caption = #21628#21483#25105#30340#31532#19968#20491'Web Service'
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
      333333333337FF3333333333330003333333333333777F333333333333080333
      3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
      33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
      B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
      BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
      B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
      3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
      333333333337F33333333333333B333333333333333733333333}
    NumGlyphs = 2
  end
end