home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2008 September
/
PCWorld_2008-09_cd.bin
/
temacd
/
photofiltre
/
pf-setup-en.exe
/
PhotoFiltre.exe
/
0
/
RCDATA
/
TAUTOFORM
/
TAUTOFORM.txt
Wrap
Text File
|
2008-01-12
|
26KB
|
1,117 lines
object AutoForm: TAutoForm
Left = 236
Top = 176
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsDialog
Caption = 'Automatisation'
ClientHeight = 386
ClientWidth = 537
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnHide = FormHide
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object TLabel
Left = 48
Top = 152
Width = 73
Height = 13
Caption = 'Luminosit'#233' : 0%'
end
object PageControl: TPageControl
Left = 8
Top = 8
Width = 521
Height = 369
ActivePage = TshFichiers
MultiLine = True
TabOrder = 0
OnChange = PageControlChange
OnChanging = PageControlChanging
object TshFichiers: TTabSheet
Caption = 'Fichier'
object LblFormatExport: TLabel
Left = 264
Top = 200
Width = 78
Height = 13
Caption = 'Format d'#39'export :'
Transparent = True
end
object LblDirExport: TLabel
Left = 16
Top = 200
Width = 81
Height = 13
Caption = 'Dossier d'#39'export :'
Transparent = True
end
object SBFiltre: TSpeedButton
Left = 474
Top = 88
Width = 23
Height = 21
Flat = True
OnClick = SBFiltreClick
end
object Bevel3: TBevel
Left = 16
Top = 188
Width = 481
Height = 9
Shape = bsTopLine
end
object SBExport: TSpeedButton
Left = 226
Top = 216
Width = 23
Height = 21
Flat = True
OnClick = SBExportClick
end
object LblExemple: TLabel
Left = 16
Top = 296
Width = 54
Height = 13
Caption = 'LblExemple'
Transparent = True
end
object LblQual1: TLabel
Left = 264
Top = 276
Width = 97
Height = 13
AutoSize = False
Caption = 'Qualit'#233' inf'#233'rieure'
Transparent = True
end
object LblQual2: TLabel
Left = 400
Top = 276
Width = 95
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'Qualit'#233' sup'#233'rieure'
Transparent = True
end
object LblNbCouleurs: TLabel
Left = 152
Top = 304
Width = 101
Height = 13
Caption = 'Nombre de couleurs :'
Transparent = True
end
object LblDirSrc: TLabel
Left = 264
Top = 16
Width = 76
Height = 13
Caption = 'Dossier source :'
Transparent = True
end
object Label6: TLabel
Left = 16
Top = 16
Width = 40
Height = 13
Caption = 'Images :'
Transparent = True
end
object SBSrc: TSpeedButton
Left = 474
Top = 32
Width = 23
Height = 21
Flat = True
OnClick = SBSrcClick
end
object LblFormatSrc: TLabel
Left = 264
Top = 72
Width = 73
Height = 13
Caption = 'Format source :'
Transparent = True
end
object LblCompress: TLabel
Left = 368
Top = 276
Width = 24
Height = 13
Alignment = taCenter
AutoSize = False
Caption = '90'
Transparent = True
end
object FileListBox: TFileListBox
Left = 16
Top = 32
Width = 233
Height = 137
ItemHeight = 13
TabOrder = 0
OnMouseDown = FileListBoxMouseDown
end
object CmbFilter: TFilterComboBox
Left = 264
Top = 88
Width = 209
Height = 21
FileList = FileListBox
TabOrder = 1
end
object CmbFormatExport: TComboBox
Left = 264
Top = 216
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 2
OnChange = CmbFormatExportChange
Items.Strings = (
'JPEG (*.jpg)'
'Bitmap (*.bmp)'
'GIF (*.gif)'
'Targa (*.tga)'
'PNG (*.png)'
'TIFF (*.tif)')
end
object EdiSequence: TEdit
Left = 16
Top = 268
Width = 207
Height = 21
TabOrder = 3
Text = 'Image'
OnChange = EdiSequenceChange
end
object ChkSequence: TCheckBox
Left = 16
Top = 248
Width = 161
Height = 17
Caption = 'S'#233'quence'
TabOrder = 4
OnClick = ChkSequenceClick
end
object TrbCompress: TTrackBar
Left = 258
Top = 248
Width = 245
Height = 25
Max = 100
Min = 10
PageSize = 10
Frequency = 5
Position = 90
TabOrder = 5
ThumbLength = 15
OnChange = TrbCompressChange
end
object CmbNbCouleurs: TComboBox
Left = 264
Top = 300
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 6
Items.Strings = (
'Nombre maximum de couleurs'
'256 couleurs'
'16 couleurs'
'Noir et Blanc (2 couleurs, bichromie)'
'Noir et Blanc (2 couleurs, tramage)')
end
object EdiDossierExport: TSpecialEdit
Left = 16
Top = 216
Width = 209
Height = 21
BorderStyle = bsSingle
ButtonStyle = stDown
DisabledColor = clNone
ItemIndex = -1
MinimizeText = True
NumGlyphs = 1
ParentColor = False
ReadOnly = False
ShowButton = False
TabOrder = 7
TabStop = True
OnClick = SBExportClick
end
object CBSel: TCheckBox
Left = 264
Top = 132
Width = 225
Height = 17
Caption = 'S'#233'lection personnalis'#233'e'
TabOrder = 8
OnClick = CBSelClick
end
object EdiDirSrc: TSpecialEdit
Left = 264
Top = 32
Width = 209
Height = 21
BorderStyle = bsSingle
ButtonStyle = stDown
DisabledColor = clNone
ItemIndex = -1
MinimizeText = True
NumGlyphs = 1
ParentColor = False
ReadOnly = False
ShowButton = False
TabOrder = 9
TabStop = True
OnClick = SBSrcClick
end
end
object TshImage: TTabSheet
Caption = 'Image'
ImageIndex = 1
object LblLargeurImage: TLabel
Left = 24
Top = 48
Width = 42
Height = 13
Caption = 'Largeur :'
Transparent = True
end
object LblHauteurImage: TLabel
Left = 104
Top = 48
Width = 44
Height = 13
Caption = 'Hauteur :'
Transparent = True
end
object LblLargeurCadre: TLabel
Left = 376
Top = 48
Width = 42
Height = 13
Caption = 'Largeur :'
Transparent = True
end
object LblCouleurCadre: TLabel
Left = 296
Top = 48
Width = 42
Height = 13
Caption = 'Couleur :'
Transparent = True
end
object LblLargeurZone: TLabel
Left = 24
Top = 192
Width = 42
Height = 13
Caption = 'Largeur :'
Transparent = True
end
object LblHauteurZone: TLabel
Left = 104
Top = 192
Width = 44
Height = 13
Caption = 'Hauteur :'
Transparent = True
end
object LblCouleurFond: TLabel
Left = 184
Top = 192
Width = 30
Height = 13
Caption = 'Fond :'
Transparent = True
end
object LblMotif: TLabel
Left = 24
Top = 244
Width = 68
Height = 13
Caption = 'Motif de fond :'
Transparent = True
end
object Bevel1: TBevel
Left = 24
Top = 148
Width = 465
Height = 9
Shape = bsTopLine
end
object SBMotif: TSpeedButton
Left = 210
Top = 260
Width = 23
Height = 21
Flat = True
OnClick = SBMotifClick
end
object LblPosition: TLabel
Left = 296
Top = 192
Width = 43
Height = 13
Caption = 'Position :'
Transparent = True
end
object LblUniteImage: TLabel
Left = 184
Top = 48
Width = 31
Height = 13
Caption = 'Unit'#233' :'
Transparent = True
end
object SBMotif2: TSpeedButton
Left = 233
Top = 260
Width = 23
Height = 21
Flat = True
OnClick = SBMotif2Click
end
object ChkRedim: TCheckBox
Left = 24
Top = 24
Width = 169
Height = 17
Caption = 'Taille de l'#39'image'
TabOrder = 0
OnClick = ChkRedimClick
end
object ChkCadre: TCheckBox
Left = 296
Top = 24
Width = 145
Height = 17
Caption = 'Encadrement'
TabOrder = 1
OnClick = ChkCadreClick
end
object ChkZoneTravail: TCheckBox
Left = 24
Top = 168
Width = 225
Height = 17
Caption = 'Taille de la zone de travail'
TabOrder = 2
OnClick = ChkZoneTravailClick
end
object ChkOmbre: TCheckBox
Left = 400
Top = 192
Width = 105
Height = 17
Caption = 'Ombre port'#233'e'
TabOrder = 3
OnClick = ChkOmbreClick
end
object CBExterieur: TCheckBox
Left = 296
Top = 92
Width = 113
Height = 17
Caption = 'Ext'#233'rieur'
TabOrder = 4
end
object SELargeurCadre: TSpinEdit2
Left = 376
Top = 64
Width = 73
Height = 21
MaxLength = 3
MaxValue = 500
MinValue = 1
ShowUpDown = True
TabOrder = 5
Value = 15
end
object SELargeurZone: TSpinEdit2
Left = 24
Top = 208
Width = 73
Height = 21
MaxValue = 10000
MinValue = 0
ShowUpDown = True
TabOrder = 6
Value = 0
end
object SEHauteurZone: TSpinEdit2
Left = 104
Top = 208
Width = 73
Height = 21
MaxValue = 10000
MinValue = 0
ShowUpDown = True
TabOrder = 7
Value = 0
end
object ChkRedimOptimiser: TCheckBox
Left = 24
Top = 110
Width = 169
Height = 17
Caption = 'Optimiser'
Checked = True
State = cbChecked
TabOrder = 8
end
object CmbUnite: TComboBox
Left = 184
Top = 64
Width = 73
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 9
Text = 'pixels'
OnChange = CmbUniteChange
Items.Strings = (
'pixels'
'%')
end
object ToolBar: TToolBar
Left = 292
Top = 210
Width = 89
Height = 90
Align = alNone
ButtonHeight = 26
ButtonWidth = 27
Caption = 'ToolBar'
EdgeBorders = []
Flat = True
Images = MainForm.ImageList
TabOrder = 10
Transparent = True
Wrapable = False
object TB0: TToolButton
Left = 0
Top = 0
Caption = 'TB0'
ImageIndex = 40
OnClick = TBClick
end
object TB1: TToolButton
Tag = 1
Left = 27
Top = 0
Caption = 'TB1'
ImageIndex = 40
OnClick = TBClick
end
object TB2: TToolButton
Tag = 2
Left = 54
Top = 0
Caption = 'TB2'
ImageIndex = 40
Wrap = True
OnClick = TBClick
end
object TB3: TToolButton
Tag = 3
Left = 0
Top = 26
Caption = 'TB3'
ImageIndex = 40
OnClick = TBClick
end
object TB4: TToolButton
Tag = 4
Left = 27
Top = 26
Caption = 'TB4'
ImageIndex = 40
OnClick = TBClick
end
object TB5: TToolButton
Tag = 5
Left = 54
Top = 26
Caption = 'TB5'
ImageIndex = 40
Wrap = True
OnClick = TBClick
end
object TB6: TToolButton
Tag = 6
Left = 0
Top = 52
Caption = 'TB6'
ImageIndex = 40
OnClick = TBClick
end
object TB7: TToolButton
Tag = 7
Left = 27
Top = 52
Caption = 'TB7'
ImageIndex = 40
OnClick = TBClick
end
object TB8: TToolButton
Tag = 8
Left = 54
Top = 52
Caption = 'TB8'
ImageIndex = 40
OnClick = TBClick
end
end
object ColorEditCadre: TColorEdit
Left = 296
Top = 64
Width = 73
Height = 21
BorderStyle = bsSingle
Color = clWhite
CustomText = 'Autres couleurs...'
ColorDialog = MainForm.GlobalColorDialog
ReadOnly = False
TabOrder = 11
TabStop = True
end
object ColorEditFond: TColorEdit
Left = 184
Top = 208
Width = 73
Height = 21
BorderStyle = bsSingle
Color = clWhite
CustomText = 'Autres couleurs...'
ColorDialog = MainForm.GlobalColorDialog
ReadOnly = False
TabOrder = 12
TabStop = True
end
object SELargeurOmbre: TSpinEdit2
Left = 400
Top = 212
Width = 65
Height = 21
MaxValue = 15
MinValue = 5
ShowUpDown = True
TabOrder = 13
Value = 7
end
object EdiMotif: TSpecialEdit
Left = 24
Top = 260
Width = 185
Height = 21
BorderStyle = bsSingle
ButtonStyle = stDown
DisabledColor = clBtnFace
ItemIndex = -1
MinimizeText = True
NumGlyphs = 1
ParentColor = False
ReadOnly = False
ShowButton = False
TabOrder = 14
TabStop = True
OnClick = SBMotifClick
end
object SELargeurImage: TFloatSpinEdit
Left = 24
Top = 64
Width = 73
Height = 21
Format = '0'
Increment = 1.000000000000000000
MaxValue = 10000.000000000000000000
MinValue = 10.000000000000000000
ShowUpDown = True
TabOrder = 15
Value = 640.000000000000000000
OnChange = SELargeurImageChange
end
object SEHauteurImage: TFloatSpinEdit
Left = 104
Top = 64
Width = 73
Height = 21
Format = '0'
Increment = 1.000000000000000000
MaxValue = 10000.000000000000000000
MinValue = 10.000000000000000000
ShowUpDown = True
TabOrder = 16
Value = 480.000000000000000000
OnChange = SEHauteurImageChange
end
object ChkRedimProportions: TCheckBox
Left = 24
Top = 92
Width = 201
Height = 17
Caption = 'Conserver les proportions'
Checked = True
State = cbChecked
TabOrder = 17
end
end
object TshReglages: TTabSheet
Caption = 'R'#233'glage'
ImageIndex = 2
object LblLuminosite: TLabel
Left = 30
Top = 32
Width = 73
Height = 13
Caption = 'Luminosit'#233' : 0%'
Transparent = True
end
object LblContraste: TLabel
Left = 30
Top = 96
Width = 68
Height = 13
Caption = 'Contraste : 0%'
Transparent = True
end
object LblSaturation: TLabel
Left = 30
Top = 160
Width = 71
Height = 13
Caption = 'Saturation : 0%'
Transparent = True
end
object LblGamma: TLabel
Left = 30
Top = 224
Width = 115
Height = 13
Caption = 'Correction gamma : 1,00'
Transparent = True
end
object Label1: TLabel
Left = 304
Top = 160
Width = 43
Height = 13
Caption = 'Couche :'
Transparent = True
end
object Label2: TLabel
Left = 304
Top = 32
Width = 43
Height = 13
Caption = 'Couche :'
Transparent = True
end
object Label3: TLabel
Left = 304
Top = 96
Width = 43
Height = 13
Caption = 'Couche :'
Transparent = True
end
object Label4: TLabel
Left = 304
Top = 224
Width = 43
Height = 13
Caption = 'Couche :'
Transparent = True
end
object TrbContraste: TTrackBar
Left = 24
Top = 112
Width = 257
Height = 25
Max = 100
Min = -100
PageSize = 10
Frequency = 10
TabOrder = 1
ThumbLength = 15
OnChange = TrbContrasteChange
end
object TrbLuminosite: TTrackBar
Left = 24
Top = 48
Width = 257
Height = 25
Max = 100
Min = -100
PageSize = 10
Frequency = 10
TabOrder = 0
ThumbLength = 15
OnChange = TrbLuminositeChange
end
object TrbSaturation: TTrackBar
Left = 24
Top = 176
Width = 257
Height = 25
Max = 100
Min = -100
PageSize = 10
Frequency = 10
TabOrder = 2
ThumbLength = 15
OnChange = TrbSaturationChange
end
object TrbGamma: TTrackBar
Left = 24
Top = 240
Width = 257
Height = 25
Max = 30
Min = 1
PageSize = 1
Position = 10
TabOrder = 3
ThumbLength = 15
OnChange = TrbGammaChange
end
object CBCoucheSat: TComboBox
Left = 304
Top = 176
Width = 81
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 4
Text = '<Toutes>'
Items.Strings = (
'<Toutes>'
'Rouge'
'Vert'
'Bleu'
'Cyan'
'Magenta'
'Jaune')
end
object CBCoucheLum: TComboBox
Left = 304
Top = 48
Width = 81
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 5
Text = '<Toutes>'
Items.Strings = (
'<Toutes>'
'Rouge'
'Vert'
'Bleu'
'Cyan'
'Magenta'
'Jaune')
end
object CBCoucheCtr: TComboBox
Left = 304
Top = 112
Width = 81
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 6
Text = '<Toutes>'
Items.Strings = (
'<Toutes>'
'Rouge'
'Vert'
'Bleu'
'Cyan'
'Magenta'
'Jaune')
end
object CBCoucheGam: TComboBox
Left = 304
Top = 240
Width = 81
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 7
Text = '<Toutes>'
Items.Strings = (
'<Toutes>'
'Rouge'
'Vert'
'Bleu'
'Cyan'
'Magenta'
'Jaune')
end
end
object TshFiltres: TTabSheet
Caption = 'Filtre'
ImageIndex = 4
object LblOpaciteFiltre: TLabel
Left = 32
Top = 192
Width = 37
Height = 13
Caption = 'Opacit'#233
Transparent = True
end
object Bevel2: TBevel
Left = 32
Top = 114
Width = 449
Height = 9
Shape = bsTopLine
end
object ChkDurcir: TCheckBox
Left = 32
Top = 32
Width = 113
Height = 17
Caption = 'Plus net'
TabOrder = 0
end
object ChkAdoucir: TCheckBox
Left = 32
Top = 56
Width = 113
Height = 17
Caption = 'Adoucir'
TabOrder = 1
end
object ChkFlou: TCheckBox
Left = 32
Top = 80
Width = 113
Height = 17
Caption = 'Flou'
TabOrder = 2
end
object ChkBruit: TCheckBox
Left = 176
Top = 56
Width = 161
Height = 17
Caption = 'Ajouter du bruit'
TabOrder = 3
end
object ChkScanlines: TCheckBox
Left = 176
Top = 80
Width = 161
Height = 17
Caption = 'Lignes de balayage'
TabOrder = 4
end
object ChkFiltre: TCheckBox
Left = 32
Top = 136
Width = 201
Height = 17
Caption = 'Filtre color'#233
TabOrder = 5
OnClick = ChkFiltreClick
end
object ChkInverserFiltre: TCheckBox
Left = 32
Top = 242
Width = 177
Height = 17
Caption = 'Inverser'
TabOrder = 6
end
object ColorEditFiltre: TColorEdit
Left = 32
Top = 160
Width = 81
Height = 21
BorderStyle = bsSingle
Color = clMaroon
CustomText = 'Autres couleurs...'
ColorDialog = MainForm.GlobalColorDialog
ReadOnly = False
TabOrder = 7
TabStop = True
end
object TrbOpaciteFiltre: TTrackBar
Left = 26
Top = 208
Width = 255
Height = 25
Max = 100
PageSize = 5
Frequency = 5
Position = 30
TabOrder = 8
ThumbLength = 15
OnChange = TrbOpaciteFiltreChange
end
object ChkRelief: TCheckBox
Left = 176
Top = 32
Width = 161
Height = 17
Caption = 'Relief'
TabOrder = 9
end
end
object TabSheet1: TTabSheet
Caption = 'Transformation'
ImageIndex = 5
object Bevel4: TBevel
Left = 32
Top = 146
Width = 449
Height = 9
Shape = bsTopLine
end
object ChkRotation: TCheckBox
Left = 32
Top = 32
Width = 153
Height = 17
Caption = 'Rotation'
TabOrder = 0
OnClick = ChkRotationClick
end
object PnlRotation: TPanel
Left = 24
Top = 56
Width = 289
Height = 81
BevelOuter = bvNone
TabOrder = 1
object RdbRotation1: TRadioButton
Left = 8
Top = 8
Width = 169
Height = 17
Caption = 'Rotation 90'#176' horaire'
Checked = True
TabOrder = 0
TabStop = True
end
object RdbRotation2: TRadioButton
Left = 8
Top = 32
Width = 169
Height = 17
Caption = 'Rotation 90'#176' antihoraire'
TabOrder = 1
end
object RdbRotation3: TRadioButton
Left = 8
Top = 56
Width = 169
Height = 17
Caption = 'Rotation 180'#176
TabOrder = 2
end
end
object ChkSymetrie: TCheckBox
Left = 32
Top = 168
Width = 145
Height = 17
Caption = 'Sym'#233'trie'
TabOrder = 2
OnClick = ChkSymetrieClick
end
object PnlSymetrie: TPanel
Left = 24
Top = 192
Width = 289
Height = 57
BevelOuter = bvNone
TabOrder = 3
object RdbSymetrie1: TRadioButton
Left = 8
Top = 8
Width = 169
Height = 17
Caption = 'Sym'#233'trie verticale'
Checked = True
TabOrder = 0
TabStop = True
end
object RdbSymetrie2: TRadioButton
Left = 8
Top = 32
Width = 169
Height = 17
Caption = 'Sym'#233'trie horizontale'
TabOrder = 1
end
end
end
object TshActions: TTabSheet
Caption = 'Action'
ImageIndex = 3
OnShow = TshActionsShow
object BtnAction: TButton
Left = 304
Top = 300
Width = 91
Height = 25
Caption = 'Ok'
TabOrder = 0
OnClick = BtnActionClick
end
object MemRapport: TMemo
Left = 16
Top = 16
Width = 480
Height = 273
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 1
end
object BtnFermer: TButton
Left = 406
Top = 300
Width = 91
Height = 25
Caption = 'Fermer'
ModalResult = 2
TabOrder = 2
OnClick = BtnFermerClick
end
object BtnParams: TButton
Left = 16
Top = 300
Width = 161
Height = 25
Caption = 'Enregistrer les param'#232'tres'
TabOrder = 3
OnClick = BtnParamsClick
end
end
end
end
