home *** CD-ROM | disk | FTP | other *** search
/ ActiveX Programming Unleashed CD / AXU.iso / activex / demos / oletrial / samples / vb / mhcdia / using.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-11-30  |  2.7 KB  |  68 lines

  1. VERSION 4.00
  2. Begin VB.Form frmUsingMhCMDialog 
  3.    BorderStyle     =   3  'Fixed Dialog
  4.    Caption         =   "Tips On Using The MhCommonDialog Control"
  5.    ClientHeight    =   4116
  6.    ClientLeft      =   1236
  7.    ClientTop       =   2256
  8.    ClientWidth     =   5952
  9.    Height          =   4488
  10.    Icon            =   "using.frx":0000
  11.    Left            =   1188
  12.    LinkTopic       =   "Form1"
  13.    MaxButton       =   0   'False
  14.    MinButton       =   0   'False
  15.    ScaleHeight     =   4116
  16.    ScaleWidth      =   5952
  17.    ShowInTaskbar   =   0   'False
  18.    Top             =   1932
  19.    Width           =   6048
  20.    Begin VB.CommandButton cmdClose 
  21.       Caption         =   "&Close"
  22.       Default         =   -1  'True
  23.       Height          =   372
  24.       Left            =   4608
  25.       TabIndex        =   0
  26.       Top             =   3672
  27.       Width           =   1212
  28.    End
  29.    Begin VB.TextBox txtTips 
  30.       BeginProperty Font 
  31.          name            =   "MS Sans Serif"
  32.          charset         =   0
  33.          weight          =   400
  34.          size            =   9.6
  35.          underline       =   0   'False
  36.          italic          =   0   'False
  37.          strikethrough   =   0   'False
  38.       EndProperty
  39.       Height          =   3504
  40.       Left            =   72
  41.       Locked          =   -1  'True
  42.       MultiLine       =   -1  'True
  43.       ScrollBars      =   2  'Vertical
  44.       TabIndex        =   1
  45.       TabStop         =   0   'False
  46.       Text            =   "using.frx":0442
  47.       Top             =   72
  48.       Width           =   5736
  49.    End
  50. Attribute VB_Name = "frmUsingMhCMDialog"
  51. Attribute VB_Creatable = False
  52. Attribute VB_Exposed = False
  53. Option Explicit
  54. Private Sub cmdClose_Click()
  55.     Unload Me
  56. End Sub
  57. Private Sub Form_Load()
  58.     ' center form to screen
  59.     Call Editor.CenterForm(Me)
  60.     ' setup the tips text box
  61.     With txtTips
  62.         .Text = "The Look" & vbCrLf & "To see the the MhCommonDialog control in action choose the Font option from the Tools menu while editing a document."
  63.         .Text = .Text & vbCrLf & vbCrLf & "Basic Usage" & vbCrLf & "For a general example of using the MhCommonDialog control see the .ShowColorDialog, .ShowFileDialog, and .ShowFontDialog methods of the CEditor Class used in this demo."
  64.         .Text = .Text & vbCrLf & vbCrLf & "Adding Your Own Controls To The MhCommonDialog"
  65.         .Text = .Text & vbCrLf & "In addition to being able to set the location and size of the MhCommonDialog control you can have controls placed onto the dialog.  This is done by setting the hWnd of the desired control to the .AddControl property of the MhCommonDialog control.  For further details please see the help file."
  66.     End With ' txtTips
  67. End Sub
  68.