BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/Multi/MultiBitmap/umain.dfm

289 lines
6.3 KiB
Plaintext

object MainForm: TMainForm
Left = 343
Top = 135
Caption = 'TIFF TIEMultiBitmap Demo - www.ImageEn.com'
ClientHeight = 617
ClientWidth = 936
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 257
Height = 617
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 264
Width = 24
Height = 13
Caption = 'Page'
end
object lblMax: TLabel
Left = 120
Top = 264
Width = 19
Height = 13
Caption = 'of 0'
end
object lblCompression: TLabel
Left = 16
Top = 299
Width = 65
Height = 13
Caption = 'Compression:'
end
object lblPageName: TLabel
Left = 16
Top = 353
Width = 58
Height = 13
Caption = 'Page Name:'
end
object lblDescription: TLabel
Left = 16
Top = 326
Width = 57
Height = 13
Caption = 'Description:'
end
object Button6: TButton
Left = 174
Top = 258
Width = 67
Height = 25
Caption = 'Show Page'
TabOrder = 7
OnClick = Button6Click
end
object DriveComboBox1: TDriveComboBox
Left = 12
Top = 8
Width = 229
Height = 19
DirList = DirectoryListBox1
TabOrder = 0
end
object DirectoryListBox1: TDirectoryListBox
Left = 12
Top = 33
Width = 229
Height = 97
FileList = FileListBox1
ItemHeight = 16
TabOrder = 1
end
object FileListBox1: TFileListBox
Left = 12
Top = 136
Width = 229
Height = 105
ItemHeight = 13
Mask = '*.tiff;*.tif'
TabOrder = 2
OnChange = FileListBox1Change
end
object edtPage: TEdit
Left = 46
Top = 260
Width = 47
Height = 21
TabOrder = 3
Text = '0'
end
object updPage: TUpDown
Left = 93
Top = 260
Width = 16
Height = 21
Associate = edtPage
TabOrder = 4
OnClick = updPageClick
end
object Button1: TButton
Left = 131
Top = 541
Width = 91
Height = 25
Caption = 'Save File'
TabOrder = 5
OnClick = Button1Click
end
object Button5: TButton
Left = 131
Top = 466
Width = 91
Height = 25
Caption = 'Delete Page'
TabOrder = 6
OnClick = Button5Click
end
object ProgressBar1: TProgressBar
Left = 0
Top = 600
Width = 257
Height = 17
Align = alBottom
TabOrder = 8
end
object btnAddPage: TButton
Left = 131
Top = 435
Width = 91
Height = 25
Caption = 'Add Page'
TabOrder = 9
OnClick = btnAddPageClick
end
object chkShowContent: TCheckBox
Left = 8
Top = 576
Width = 131
Height = 17
Caption = 'Show Thumbnails'
Checked = True
State = cbChecked
TabOrder = 10
OnClick = chkShowContentClick
end
object btnInsertPage: TButton
Left = 34
Top = 435
Width = 91
Height = 25
Caption = 'Insert Page'
TabOrder = 11
OnClick = btnInsertPageClick
end
object btnMovePage: TButton
Left = 34
Top = 466
Width = 91
Height = 25
Caption = 'Move Page'
TabOrder = 12
OnClick = btnMovePageClick
end
object edtTIFFImageDescription: TEdit
Left = 87
Top = 322
Width = 154
Height = 21
TabOrder = 13
OnChange = cmbTIFFCompressionChange
end
object edtTIFFPageName: TEdit
Left = 87
Top = 349
Width = 154
Height = 21
TabOrder = 14
OnChange = cmbTIFFCompressionChange
end
object cmbTIFFCompression: TComboBox
Left = 87
Top = 295
Width = 154
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 15
OnChange = cmbTIFFCompressionChange
Items.Strings = (
'ioTIFF_UNCOMPRESSED'
'ioTIFF_CCITT1D'
'ioTIFF_G3FAX1D'
'ioTIFF_G3FAX2D'
'ioTIFF_G4FAX'
'ioTIFF_LZW'
'ioTIFF_OLDJPEG'
'ioTIFF_JPEG'
'ioTIFF_PACKBITS'
'ioTIFF_ZIP'
'ioTIFF_DEFLATE'
'ioTIFF_UNKNOWN')
end
object btnUpdate: TButton
Left = 166
Top = 376
Width = 75
Height = 25
Caption = 'Update'
TabOrder = 16
OnClick = btnUpdateClick
end
object btnAdjustParams: TButton
Left = 34
Top = 510
Width = 91
Height = 25
Caption = 'Adjust Params'
TabOrder = 17
OnClick = btnAdjustParamsClick
end
object btnRotate: TButton
Left = 131
Top = 510
Width = 91
Height = 25
Caption = 'Rotate 90'
TabOrder = 18
OnClick = btnRotateClick
end
end
object IEMView1: TImageEnMView
Left = 257
Top = 0
Width = 679
Height = 617
Background = clBtnFace
ParentCtl3D = False
StoreType = ietThumb
ThumbWidth = 100
ThumbHeight = 100
HorizBorder = 4
VertBorder = 4
TextMargin = 0
GridWidth = 0
Style = iemsACD
ThumbnailsBackground = clBtnFace
ThumbnailsBackgroundSelected = clBtnFace
MultiSelectionOptions = []
ThumbnailsBorderWidth = 0
DefaultBottomText = iedtNone
Align = alClient
TabOrder = 1
OnClick = IEMView1Click
end
object OpenImageEnDialog1: TOpenImageEnDialog
Filter = 'TIFF files|*.tif;*.tiff'
Left = 448
Top = 56
end
object SaveImageEnDialog1: TSaveImageEnDialog
Filter =
'JPEG Bitmap (JPG)|*.jpg|CompuServe Bitmap (GIF)|*.gif|TIFF Bitma' +
'p (TIF)|*.tif|PaintBrush (PCX)|*.pcx|Portable Network Graphics (' +
'PNG)|*.png|Windows Bitmap (BMP)|*.bmp|OS/2 Bitmap (BMP)|*.bmp|Ta' +
'rga Bitmap (TGA)|*.tga|Portable PixMap (PXM)|*.pxm|Portable PixM' +
'ap (PPM)|*.ppm|Portable GreyMap (PGM)|*.pgm|Portable Bitmap (PBM' +
')|*.pbm|JPEG2000 (JP2)|*.jp2|JPEG2000 Code Stream (J2K)|*.j2k|Mu' +
'ltipage PCX (DCX)|*.dcx'
ExOptions = [sdShowPreview, sdShowAdvanced]
Left = 448
Top = 112
end
end