home *** CD-ROM | disk | FTP | other *** search
- object Extensiones: TExtensiones
- Tag = 1100
- Left = 345
- Top = 192
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsSingle
- Caption = 'Extensiones'
- ClientHeight = 326
- ClientWidth = 310
- Color = 14215660
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = True
- Position = poScreenCenter
- OnKeyPress = FormKeyPress
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ButtonAceptar: TPlaButton
- Tag = 2200
- Left = 145
- Top = 294
- Width = 73
- Height = 21
- Anchors = [akRight, akBottom]
- Caption = '&Aceptar'
- TabOrder = 1
- OnClick = ButtonAceptarClick
- Default = True
- ModalResult = 1
- end
- object ButtonCancel: TPlaButton
- Tag = 2400
- Left = 226
- Top = 294
- Width = 73
- Height = 21
- Anchors = [akRight, akBottom]
- Caption = '&Cancelar'
- TabOrder = 2
- TabStop = False
- OnClick = ButtonCancelClick
- Cancel = True
- ModalResult = 2
- end
- object grpExtensiones: TPlaGroupBox
- Tag = 18300
- Left = 14
- Top = 7
- Width = 285
- Height = 275
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Extensiones analizables'
- TabOrder = 0
- object Image10: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object lblDescripcion: TLabel
- Tag = 18400
- Left = 58
- Top = 19
- Width = 215
- Height = 39
- AutoSize = False
- Caption = 'Los archivos con las siguientes extensiones ser�n analizados. '
- WordWrap = True
- end
- object Label2: TLabel
- Left = 174
- Top = 71
- Width = 85
- Height = 13
- Caption = 'Nueva extensi�n:'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object EdExtension: TPlaEdit
- Left = 174
- Top = 87
- Width = 99
- Height = 23
- HelpContext = 220
- MaxLength = 8
- TabOrder = 0
- Transparent = False
- OnChange = EdExtensionChange
- end
- object BAnadir: TPlaButton
- Tag = 18600
- Left = 174
- Top = 118
- Width = 99
- Height = 23
- HelpContext = 155
- Caption = 'A&�adir'
- TabOrder = 1
- TabStop = False
- OnClick = BAnadirClick
- end
- object BEliminar: TPlaButton
- Tag = 18700
- Left = 174
- Top = 149
- Width = 99
- Height = 23
- HelpContext = 152
- Caption = '&Eliminar'
- Enabled = False
- TabOrder = 2
- TabStop = False
- OnClick = BEliminarClick
- end
- object ButtonLimpiar: TPlaButton
- Tag = 18800
- Left = 174
- Top = 180
- Width = 99
- Height = 23
- HelpContext = 153
- Caption = '&Limpiar Lista'
- TabOrder = 3
- TabStop = False
- OnClick = ButtonLimpiarClick
- end
- object BDefault: TPlaButton
- Tag = 2300
- Left = 174
- Top = 211
- Width = 99
- Height = 23
- HelpContext = 151
- Caption = '&Restaurar'
- TabOrder = 4
- TabStop = False
- OnClick = BDefaultClick
- end
- object CBSinExtension: TPlaCheckBox
- Tag = 60500
- Left = 58
- Top = 247
- Width = 168
- Height = 16
- HelpContext = 154
- Caption = 'Analizar archivos sin extensi�n'
- TabOrder = 5
- TabStop = False
- ParentColor = False
- end
- object LBExtensiones: TPlaListBox
- Left = 58
- Top = 71
- Width = 95
- Height = 165
- Items.Strings = (
- '386'
- 'APP'
- 'BAT'
- 'BIN'
- 'BOO'
- 'CMD'
- 'DLL'
- 'DOC'
- 'DOT'
- 'DRV'
- 'FON'
- 'MDB'
- 'OVL'
- 'OVR'
- 'PRG'
- 'SYS'
- 'XLS'
- ' ')
- TabOrder = 6
- OnClick = LBExtensionesClick
- end
- end
- end
-