77 lines
2.1 KiB
Plaintext
77 lines
2.1 KiB
Plaintext
object Form1: TForm1
|
|
Left = 200
|
|
Top = 128
|
|
Caption = 'File Format Plug-in Demo - www.ImageEn.com'
|
|
ClientHeight = 629
|
|
ClientWidth = 841
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
Menu = MainMenu1
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnActivate = FormActivate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object ImageEnView1: TImageEnView
|
|
Left = 0
|
|
Top = 0
|
|
Width = 841
|
|
Height = 629
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 0
|
|
end
|
|
object OpenImageEnDialog1: TOpenImageEnDialog
|
|
Filter =
|
|
'All graphics|*.jpg;*.jpeg;*.gif;*.tif;*.tiff;*.pcx;*.png;*.bmp;*' +
|
|
'.wmf;*.emf;*.ico;*.cur;*.avi|JPEG Bitmap (JPG;JPEG)|*.jpg;*.jpeg' +
|
|
'|CompuServe Bitmap (GIF)|*.gif|TIFF Bitmap (TIF;TIFF)|*.tif;*.ti' +
|
|
'ff|PaintBrush (PCX)|*.pcx|Portable Network Graphics (PNG)|*.png|' +
|
|
'Windows Bitmap (BMP)|*.bmp|OS/2 Bitmap (BMP)|*.bmp|Enhanced Wind' +
|
|
'ows Metafile (EMF)|*.emf|Windows Metafile (WMF)|*.wmf|Icon resou' +
|
|
'rce (ICO)|*.ico|Cursor Resource (CUR)|*.cur|Video for Windows (A' +
|
|
'VI)|*.avi'
|
|
Left = 272
|
|
Top = 72
|
|
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'
|
|
ExOptions = [sdShowPreview, sdShowAdvanced]
|
|
Left = 168
|
|
Top = 72
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
Left = 56
|
|
Top = 224
|
|
object File1: TMenuItem
|
|
Caption = '&File'
|
|
object Load1: TMenuItem
|
|
Caption = 'Load Image...'
|
|
OnClick = Load1Click
|
|
end
|
|
object LoadUNC1: TMenuItem
|
|
Caption = 'Load "UNC"'
|
|
OnClick = LoadUNC1Click
|
|
end
|
|
object Save1: TMenuItem
|
|
Caption = 'Save as "UNC"'
|
|
OnClick = Save1Click
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Exit1: TMenuItem
|
|
Caption = '&Exit'
|
|
OnClick = Exit1Click
|
|
end
|
|
end
|
|
end
|
|
end
|