Unit1.dfm 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522
  1. object Form1: TForm1
  2. Left = 241
  3. Top = 106
  4. Width = 936
  5. Height = 699
  6. Caption = 'Delphi'#35843#29992'WebService Demo'
  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. Position = poScreenCenter
  15. PixelsPerInch = 96
  16. TextHeight = 13
  17. object Label5: TLabel
  18. Left = 16
  19. Top = 224
  20. Width = 113
  21. Height = 13
  22. AutoSize = False
  23. Caption = #25191#34892#21518#36820#22238#25968#25454
  24. end
  25. object Label11: TLabel
  26. Left = 24
  27. Top = 12
  28. Width = 225
  29. Height = 13
  30. AutoSize = False
  31. Caption = 'WebService '#22320#22336#65306
  32. Font.Charset = DEFAULT_CHARSET
  33. Font.Color = clWindowText
  34. Font.Height = -11
  35. Font.Name = 'MS Sans Serif'
  36. Font.Style = [fsBold]
  37. ParentFont = False
  38. end
  39. object Label16: TLabel
  40. Left = 656
  41. Top = 12
  42. Width = 225
  43. Height = 13
  44. AutoSize = False
  45. Caption = #38656#35201#24341#29992'service'#25991#20214' '
  46. end
  47. object Label19: TLabel
  48. Left = 24
  49. Top = 150
  50. Width = 73
  51. Height = 13
  52. AutoSize = False
  53. Caption = #26597#35810#29366#24577' '
  54. end
  55. object GroupBox1: TGroupBox
  56. Left = 16
  57. Top = 40
  58. Width = 321
  59. Height = 89
  60. Caption = #36134#21495
  61. TabOrder = 0
  62. object Label1: TLabel
  63. Left = 16
  64. Top = 22
  65. Width = 24
  66. Height = 13
  67. Caption = #36134#21495
  68. end
  69. object Label2: TLabel
  70. Left = 168
  71. Top = 22
  72. Width = 33
  73. Height = 13
  74. AutoSize = False
  75. Caption = #23494#30721
  76. end
  77. object Label7: TLabel
  78. Left = 8
  79. Top = 54
  80. Width = 65
  81. Height = 13
  82. AutoSize = False
  83. Caption = #26032#23494#30721
  84. end
  85. object euid: TEdit
  86. Left = 48
  87. Top = 18
  88. Width = 97
  89. Height = 21
  90. TabOrder = 0
  91. Text = 'test'
  92. end
  93. object epwd: TEdit
  94. Left = 208
  95. Top = 18
  96. Width = 89
  97. Height = 21
  98. TabOrder = 1
  99. Text = '123456'
  100. end
  101. object Button1: TButton
  102. Left = 160
  103. Top = 48
  104. Width = 65
  105. Height = 25
  106. Caption = #26597#35810#29366#24577
  107. TabOrder = 2
  108. OnClick = Button1Click
  109. end
  110. object Button4: TButton
  111. Left = 232
  112. Top = 48
  113. Width = 73
  114. Height = 25
  115. Caption = #20462#25913#23494#30721
  116. TabOrder = 3
  117. OnClick = Button4Click
  118. end
  119. object enewpwd: TEdit
  120. Left = 56
  121. Top = 50
  122. Width = 89
  123. Height = 21
  124. TabOrder = 4
  125. end
  126. end
  127. object Memo1: TMemo
  128. Left = 16
  129. Top = 296
  130. Width = 321
  131. Height = 353
  132. BevelInner = bvNone
  133. BevelOuter = bvNone
  134. BorderStyle = bsNone
  135. Color = 15138815
  136. Ctl3D = False
  137. Font.Charset = DEFAULT_CHARSET
  138. Font.Color = clBlue
  139. Font.Height = -11
  140. Font.Name = 'MS Sans Serif'
  141. Font.Style = []
  142. Lines.Strings = (
  143. #36820#22238#29366#24577#30721
  144. ''
  145. '000 '#25104#36865#25104#21151#65281' '
  146. '-01 '#24403#21069#36134#21495#20313#39069#19981#36275#65281
  147. '-02 '#24403#21069#29992#25143'ID'#38169#35823#65281
  148. '-03 '#24403#21069#23494#30721#38169#35823#65281
  149. '-04 '#21442#25968#19981#22815#25110#21442#25968#31867#22411#38169#35823
  150. '-05 '#25163#26426#21495#30721#26684#24335#19981#23545#65281
  151. '-06 '#20869#23481#32534#30721#19981#23545#65281
  152. '-07 '#30701#20449#20869#23481#21547#26377#25935#24863#23383#31526#65281
  153. '-08 '#26080#25509#25910#25968#25454
  154. '-09 '#31995#32479#32500#25252#20013'..'
  155. '-10 '#25509#25910#21495#30721#38169#35823#25110#36229#38271
  156. '-11 '#30701#20449#20869#23481#36229#38271#65281#65288'70'#20010#23383#31526#65289
  157. '-12 '#20854#23427#38169#35823#65281
  158. '-13 '#25991#20214#20256#36755#38169#35823#65281)
  159. ParentCtl3D = False
  160. ParentFont = False
  161. TabOrder = 1
  162. end
  163. object Memo2: TMemo
  164. Left = 16
  165. Top = 242
  166. Width = 321
  167. Height = 55
  168. ScrollBars = ssVertical
  169. TabOrder = 2
  170. end
  171. object GroupBox2: TGroupBox
  172. Left = 360
  173. Top = 40
  174. Width = 553
  175. Height = 177
  176. Caption = #21457#30701#20449
  177. TabOrder = 3
  178. object Label3: TLabel
  179. Left = 8
  180. Top = 22
  181. Width = 201
  182. Height = 13
  183. AutoSize = False
  184. Caption = #25163#26426#21495#30721#65288#22810#20010#21495#29992' , '#36887#21495#20998#38548#65289
  185. end
  186. object Label4: TLabel
  187. Left = 216
  188. Top = 28
  189. Width = 209
  190. Height = 13
  191. AutoSize = False
  192. Caption = #30701#20449#20869#23481' '#26368#22823'60-70'#23383
  193. end
  194. object emobno: TMemo
  195. Left = 8
  196. Top = 40
  197. Width = 185
  198. Height = 121
  199. Color = 16775662
  200. Ctl3D = False
  201. ParentCtl3D = False
  202. TabOrder = 0
  203. end
  204. object econtent: TMemo
  205. Left = 208
  206. Top = 48
  207. Width = 329
  208. Height = 73
  209. Lines.Strings = (
  210. #21516#23398#20301#22909#65306#35831#20110#19979#20110#19977#28857#21040#23398#26657#39046#21462#27605#19994#35777#20070#65292#24352#32769#24072#12290#29305
  211. #27492#36890#30693#65281)
  212. TabOrder = 1
  213. end
  214. object Button2: TButton
  215. Left = 304
  216. Top = 128
  217. Width = 113
  218. Height = 33
  219. Caption = #21457#36865#30701#20449
  220. TabOrder = 2
  221. OnClick = Button2Click
  222. end
  223. end
  224. object GroupBox3: TGroupBox
  225. Left = 360
  226. Top = 224
  227. Width = 553
  228. Height = 169
  229. Caption = #21457#20256#30495
  230. Ctl3D = True
  231. ParentCtl3D = False
  232. TabOrder = 4
  233. object Label6: TLabel
  234. Left = 8
  235. Top = 22
  236. Width = 233
  237. Height = 13
  238. AutoSize = False
  239. Caption = #20256#30495#21495#30721#65288#22810#20010#21495#29992' , '#36887#21495#20998#38548#65289
  240. end
  241. object Label8: TLabel
  242. Left = 216
  243. Top = 56
  244. Width = 89
  245. Height = 13
  246. AutoSize = False
  247. Caption = #20256#30495#25991#20214
  248. end
  249. object Label9: TLabel
  250. Left = 328
  251. Top = 28
  252. Width = 81
  253. Height = 13
  254. AutoSize = False
  255. Caption = #20256#30495#20027#39064
  256. end
  257. object Label10: TLabel
  258. Left = 216
  259. Top = 28
  260. Width = 81
  261. Height = 13
  262. AutoSize = False
  263. Caption = #25910#20214#20154
  264. end
  265. object faxno: TMemo
  266. Left = 8
  267. Top = 40
  268. Width = 185
  269. Height = 121
  270. Color = 13565928
  271. Ctl3D = False
  272. ParentCtl3D = False
  273. TabOrder = 0
  274. end
  275. object faxfile: TEdit
  276. Left = 216
  277. Top = 74
  278. Width = 265
  279. Height = 21
  280. ReadOnly = True
  281. TabOrder = 1
  282. end
  283. object Button3: TButton
  284. Left = 488
  285. Top = 72
  286. Width = 49
  287. Height = 25
  288. Caption = #27983#35272'..'
  289. TabOrder = 2
  290. OnClick = Button3Click
  291. end
  292. object men: TEdit
  293. Left = 264
  294. Top = 24
  295. Width = 57
  296. Height = 21
  297. MaxLength = 50
  298. TabOrder = 3
  299. Text = #24352#19977
  300. end
  301. object title: TEdit
  302. Left = 392
  303. Top = 24
  304. Width = 121
  305. Height = 21
  306. MaxLength = 50
  307. TabOrder = 4
  308. Text = #25253#20215#21333
  309. end
  310. object Button5: TButton
  311. Left = 264
  312. Top = 112
  313. Width = 137
  314. Height = 41
  315. Caption = #21457#36865#20256#30495
  316. TabOrder = 5
  317. OnClick = Button5Click
  318. end
  319. object filename: TEdit
  320. Left = 440
  321. Top = 96
  322. Width = 73
  323. Height = 21
  324. TabOrder = 6
  325. Visible = False
  326. end
  327. end
  328. object service_url: TEdit
  329. Left = 144
  330. Top = 8
  331. Width = 497
  332. Height = 21
  333. TabOrder = 5
  334. Text = 'http://service2.winic.org:8003/Service.asmx'
  335. end
  336. object GroupBox4: TGroupBox
  337. Left = 360
  338. Top = 408
  339. Width = 553
  340. Height = 241
  341. Caption = #35821#38899#26381#21153
  342. TabOrder = 6
  343. object Label12: TLabel
  344. Left = 208
  345. Top = 144
  346. Width = 177
  347. Height = 13
  348. AutoSize = False
  349. Caption = #22768#38899#25110#24405#38899#25991#20214
  350. end
  351. object Label13: TLabel
  352. Left = 208
  353. Top = 48
  354. Width = 233
  355. Height = 13
  356. AutoSize = False
  357. Caption = #35821#38899#25991#23383'('#26368#22810'8000)'
  358. end
  359. object Label14: TLabel
  360. Left = 216
  361. Top = 20
  362. Width = 41
  363. Height = 13
  364. AutoSize = False
  365. Caption = #31867#22411#65306
  366. end
  367. object Label15: TLabel
  368. Left = 8
  369. Top = 22
  370. Width = 185
  371. Height = 13
  372. AutoSize = False
  373. Caption = #34987#21483#21495#30721#65288#22810#20010', '#36887#21495#20998#24320#65289
  374. end
  375. object Label17: TLabel
  376. Left = 8
  377. Top = 168
  378. Width = 201
  379. Height = 13
  380. AutoSize = False
  381. Caption = #23458#26381#30005#35805'('#22810#20010','#21495#38548#24320')'
  382. end
  383. object Label18: TLabel
  384. Left = 16
  385. Top = 208
  386. Width = 201
  387. Height = 13
  388. AutoSize = False
  389. Caption = #23458#26381#30005#35805#29992#20110#34987#21483#29992#25143#25353'0'#21518#36716#25509#30340#21495#30721
  390. Font.Charset = DEFAULT_CHARSET
  391. Font.Color = cl3DDkShadow
  392. Font.Height = -11
  393. Font.Name = 'MS Sans Serif'
  394. Font.Style = []
  395. ParentFont = False
  396. end
  397. object v_no: TMemo
  398. Left = 8
  399. Top = 40
  400. Width = 185
  401. Height = 113
  402. Color = 13172735
  403. Ctl3D = False
  404. ParentCtl3D = False
  405. TabOrder = 0
  406. end
  407. object v_file: TEdit
  408. Left = 208
  409. Top = 162
  410. Width = 281
  411. Height = 21
  412. Enabled = False
  413. ReadOnly = True
  414. TabOrder = 1
  415. end
  416. object RadioButton1: TRadioButton
  417. Left = 264
  418. Top = 18
  419. Width = 73
  420. Height = 17
  421. Caption = #20154#24037#21512#25104
  422. Checked = True
  423. TabOrder = 2
  424. TabStop = True
  425. OnClick = RadioButton1Click
  426. end
  427. object RadioButton2: TRadioButton
  428. Left = 344
  429. Top = 18
  430. Width = 73
  431. Height = 17
  432. Caption = #36719#20214#21512#25104
  433. TabOrder = 3
  434. OnClick = RadioButton2Click
  435. end
  436. object RadioButton3: TRadioButton
  437. Left = 432
  438. Top = 18
  439. Width = 73
  440. Height = 17
  441. Caption = #24405#38899#25991#20214
  442. TabOrder = 4
  443. OnClick = RadioButton3Click
  444. end
  445. object mode: TEdit
  446. Left = 512
  447. Top = 16
  448. Width = 25
  449. Height = 21
  450. ReadOnly = True
  451. TabOrder = 5
  452. Text = '1'
  453. end
  454. object v_txt: TMemo
  455. Left = 208
  456. Top = 64
  457. Width = 329
  458. Height = 73
  459. Lines.Strings = (
  460. #31227#21160#21830#21153#20013#24515#36890#30693#24744#65306#23562#25964#30340#24352#20029#24179#29992#25143#24744'8'#26376#20221#30340#30005#35805#36153#29992
  461. #20026'2895'#20803#65292#20026#19981#24433#21709#24744#30340#20351#29992#35831#23613#24555#21040#33829#19994#32564#36153#12290#25509#36890#23458#26381
  462. #20013#24515#35831#25353' 0'#12290#35874#35874#21512#20316#65281)
  463. TabOrder = 6
  464. end
  465. object bt8: TButton
  466. Left = 496
  467. Top = 160
  468. Width = 41
  469. Height = 25
  470. Caption = '*.WAV'
  471. Enabled = False
  472. TabOrder = 7
  473. OnClick = bt8Click
  474. end
  475. object v_svrno: TEdit
  476. Left = 8
  477. Top = 184
  478. Width = 185
  479. Height = 21
  480. MaxLength = 50
  481. TabOrder = 8
  482. Text = '075525599861'
  483. end
  484. object Button6: TButton
  485. Left = 312
  486. Top = 192
  487. Width = 81
  488. Height = 33
  489. Caption = #21457#36865#35821#38899
  490. TabOrder = 9
  491. OnClick = Button6Click
  492. end
  493. end
  494. object Button7: TButton
  495. Left = 240
  496. Top = 144
  497. Width = 75
  498. Height = 25
  499. Caption = #26597#35810#29366#24577
  500. TabOrder = 7
  501. OnClick = Button7Click
  502. end
  503. object Edit1: TEdit
  504. Left = 88
  505. Top = 146
  506. Width = 137
  507. Height = 21
  508. TabOrder = 8
  509. end
  510. object OpenDialog1: TOpenDialog
  511. Left = 336
  512. Top = 296
  513. end
  514. object HTTPRIO1: THTTPRIO
  515. HTTPWebNode.Agent = 'Borland SOAP 1.2'
  516. HTTPWebNode.UseUTF8InHeader = False
  517. HTTPWebNode.InvokeOptions = [soIgnoreInvalidCerts, soAutoCheckAccessPointViaUDDI]
  518. Converter.Options = [soSendMultiRefObj, soTryAllSchema, soRootRefNodesToBody, soCacheMimeResponse, soUTF8EncodeXML]
  519. Left = 472
  520. Top = 8
  521. end
  522. end