*/
If you have a PH account, you can customize your PH profile.
*/

View program launcher\frmConfirm.frm

Program Launcher v1.0

Submitted By: meyyappan_rmp
Rating: starstarstarstar (Rate It)


VERSION 5.00
Begin VB.Form frmConfirm
   BackColor       =   &H00C0C0C0&
   BorderStyle     =   1  'Fixed Single
   ClientHeight    =   1305
   ClientLeft      =   15
   ClientTop       =   15
   ClientWidth     =   4590
   ControlBox      =   0   'False
   BeginProperty Font
      Name            =   "Tahoma"
      Size            =   8.25
      Charset         =   0
      Weight          =   700
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form2"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   1305
   ScaleWidth      =   4590
   ShowInTaskbar   =   0   'False
   StartUpPosition =   1  'CenterOwner
   Begin VB.PictureBox Picture1
      BackColor       =   &H00FF0000&
      BeginProperty Font
         Name            =   "MS Sans Serif"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   1005
      Left            =   150
      ScaleHeight     =   945
      ScaleWidth      =   4215
      TabIndex        =   0
      Top             =   150
      Width           =   4275
      Begin VB.CommandButton cmdYes
         BackColor       =   &H00E0E0E0&
         Cancel          =   -1  'True
         Caption         =   "&Yes"
         BeginProperty Font
            Name            =   "Tahoma"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   2340
         Style           =   1  'Graphical
         TabIndex        =   3
         Top             =   540
         Width           =   825
      End
      Begin VB.CommandButton cmdNo
         BackColor       =   &H00E0E0E0&
         Caption         =   "&No"
         Default         =   -1  'True
         BeginProperty Font
            Name            =   "Tahoma"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   3240
         Style           =   1  'Graphical
         TabIndex        =   2
         Top             =   540
         Width           =   825
      End
      Begin VB.Label Label1
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         AutoSize        =   -1  'True
         BackColor       =   &H80000005&
         BackStyle       =   0  'Transparent
         Caption         =   "Remove selected file from Program Launcher?"
         ForeColor       =   &H00FFFFFF&
         Height          =   195
         Left            =   165
         TabIndex        =   1
         Top             =   60
         Width           =   3945
      End
   End
End
Attribute VB_Name = "frmConfirm"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub cmdNo_Click()
    blnRemoveHotKey = False
    Unload Me
    Set frmConfirm = Nothing 'to release the memory
End Sub

Private Sub cmdYes_Click()
    blnRemoveHotKey = True
    Unload Me
    Set frmConfirm = Nothing 'to release the memory
End Sub

Private Sub Form_Load()
    'to make this form always on top
    Call SetWindowPos(hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
    blnRemoveHotKey = False
    prcColorForm Me
End Sub

corner
© 1996-2008 CommunityHeaven LLC. All rights reserved. Reproduction in whole or in part, in any form or medium without express written permission is prohibited.
Violators of this policy may be subject to legal action. Please read our Terms Of Use and Privacy Statement for more information.
North American business development: Nicolai Wadstrom. Publisher: Lars Hagelin.