Unit1.dfm 1.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. object Form1: TForm1
  2. Left = 360
  3. Top = 130
  4. BorderIcons = [biSystemMenu]
  5. BorderStyle = bsSingle
  6. Caption = 'Form1'
  7. ClientHeight = 121
  8. ClientWidth = 283
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'MS Sans Serif'
  14. Font.Style = []
  15. OldCreateOrder = False
  16. OnCreate = FormCreate
  17. PixelsPerInch = 96
  18. TextHeight = 13
  19. object Label1: TLabel
  20. Left = 16
  21. Top = 56
  22. Width = 35
  23. Height = 13
  24. Caption = #37096#38376'ID'
  25. end
  26. object Button1: TButton
  27. Left = 16
  28. Top = 8
  29. Width = 97
  30. Height = 25
  31. Caption = #23548#20837
  32. TabOrder = 0
  33. OnClick = Button1Click
  34. end
  35. object SpinEdit1: TSpinEdit
  36. Left = 64
  37. Top = 48
  38. Width = 121
  39. Height = 22
  40. MaxValue = 0
  41. MinValue = 0
  42. TabOrder = 1
  43. Value = 0
  44. end
  45. object ADOConnection1: TADOConnection
  46. ConnectionString =
  47. 'Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=E:\Real' +
  48. 'ICQ For LINKING('#24066#25919#24220')\RealICQ Projects For Win32('#27993#27743#32852#20449')\'#29992#25143#23548#20837'\'#24066#25919#24220'.m' +
  49. 'db;Persist Security Info=True'
  50. LoginPrompt = False
  51. Provider = 'Microsoft.Jet.OLEDB.4.0'
  52. Left = 200
  53. Top = 16
  54. end
  55. object ADOConnection2: TADOConnection
  56. ConnectionString =
  57. 'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
  58. 'fo=False;Initial Catalog=DBRealICQServer_For_Linking;Data Source' +
  59. '=(local)'
  60. LoginPrompt = False
  61. Provider = 'SQLOLEDB.1'
  62. Left = 232
  63. Top = 16
  64. end
  65. object ADODataSet1: TADODataSet
  66. Connection = ADOConnection1
  67. Parameters = <>
  68. Left = 24
  69. Top = 72
  70. end
  71. object ADOQuery1: TADOQuery
  72. Connection = ADOConnection2
  73. Parameters = <>
  74. Left = 64
  75. Top = 80
  76. end
  77. end