home *** CD-ROM | disk | FTP | other *** search
/ Internet Magazine 2002 December / INTERNET97.ISO / pc / software / windows / building / xmlspy / setup44.exe / Data1.cab / F1516_ModXMLDataDlg.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  2000-09-04  |  2.8 KB  |  104 lines
  1. VERSION 5.00
  2. Begin VB.Form ModXMLDataDlg 
  3.    BorderStyle     =   3  'Fixed Dialog
  4.    Caption         =   "Modify XMLData"
  5.    ClientHeight    =   1380
  6.    ClientLeft      =   2760
  7.    ClientTop       =   3750
  8.    ClientWidth     =   5415
  9.    LinkTopic       =   "Form1"
  10.    MaxButton       =   0   'False
  11.    MinButton       =   0   'False
  12.    ScaleHeight     =   1380
  13.    ScaleWidth      =   5415
  14.    ShowInTaskbar   =   0   'False
  15.    Begin VB.TextBox KindEdit 
  16.       Enabled         =   0   'False
  17.       Height          =   285
  18.       Left            =   840
  19.       Locked          =   -1  'True
  20.       TabIndex        =   7
  21.       Text            =   "<kind>"
  22.       Top             =   240
  23.       Width           =   2895
  24.    End
  25.    Begin VB.TextBox ValueEdit 
  26.       Height          =   285
  27.       Left            =   840
  28.       TabIndex        =   6
  29.       Text            =   "<value>"
  30.       Top             =   960
  31.       Width           =   2895
  32.    End
  33.    Begin VB.TextBox NameEdit 
  34.       Height          =   285
  35.       Left            =   840
  36.       TabIndex        =   3
  37.       Text            =   "<name>"
  38.       Top             =   600
  39.       Width           =   2895
  40.    End
  41.    Begin VB.CommandButton CancelButton 
  42.       Caption         =   "Cancel"
  43.       Height          =   375
  44.       Left            =   4080
  45.       TabIndex        =   1
  46.       Top             =   600
  47.       Width           =   1215
  48.    End
  49.    Begin VB.CommandButton OKButton 
  50.       Caption         =   "OK"
  51.       Height          =   375
  52.       Left            =   4080
  53.       TabIndex        =   0
  54.       Top             =   120
  55.       Width           =   1215
  56.    End
  57.    Begin VB.Label Label3 
  58.       Caption         =   "Value"
  59.       Height          =   255
  60.       Left            =   120
  61.       TabIndex        =   5
  62.       Top             =   1080
  63.       Width           =   615
  64.    End
  65.    Begin VB.Label Label2 
  66.       Caption         =   "Name"
  67.       Height          =   255
  68.       Left            =   120
  69.       TabIndex        =   4
  70.       Top             =   720
  71.       Width           =   615
  72.    End
  73.    Begin VB.Label Label1 
  74.       Caption         =   "Kind:"
  75.       Height          =   255
  76.       Left            =   120
  77.       TabIndex        =   2
  78.       Top             =   360
  79.       Width           =   615
  80.    End
  81. Attribute VB_Name = "ModXMLDataDlg"
  82. Attribute VB_GlobalNameSpace = False
  83. Attribute VB_Creatable = False
  84. Attribute VB_PredeclaredId = True
  85. Attribute VB_Exposed = False
  86. Public bOK As Boolean
  87. Public nKind As SPYXMLDataKind
  88. Option Explicit
  89. Private Sub CancelButton_Click()
  90.     Hide
  91. End Sub
  92. Private Sub Form_Activate()
  93. Select Case nKind
  94.     Case spyXMLDataComment
  95.         KindEdit.Text = "comment"
  96.     Case spyXMLDataElement
  97.         KindEdit.Text = "element"
  98. End Select
  99. End Sub
  100. Private Sub OKButton_Click()
  101.     bOK = True
  102.     Hide
  103. End Sub
  104.