BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/Database/ManualVect/main.dfm

142 lines
3.3 KiB
Plaintext

object MainForm: TMainForm
Left = 157
Top = 122
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'OpenFromFileAll/SaveToFileAll example'
ClientHeight = 509
ClientWidth = 744
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 140
Height = 468
Align = alLeft
Color = clBtnFace
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Name'
Visible = True
end>
end
object Panel2: TPanel
Left = 0
Top = 468
Width = 744
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object Button4: TButton
Left = 144
Top = 8
Width = 89
Height = 25
Caption = 'Save in Table'
TabOrder = 0
OnClick = Button4Click
end
object Button1: TButton
Left = 8
Top = 8
Width = 75
Height = 25
Caption = 'Open File...'
TabOrder = 1
OnClick = Button1Click
end
end
object Panel1: TPanel
Left = 140
Top = 0
Width = 604
Height = 468
Align = alClient
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 2
object Panel4: TPanel
Left = 0
Top = 0
Width = 604
Height = 41
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Button10: TButton
Left = 112
Top = 8
Width = 75
Height = 25
Caption = 'Put text'
TabOrder = 0
OnClick = Button10Click
end
object Button11: TButton
Left = 8
Top = 8
Width = 75
Height = 25
Caption = 'Select'
TabOrder = 1
OnClick = Button11Click
end
end
object ImageEnVect1: TImageEnVect
Left = 0
Top = 41
Width = 604
Height = 427
ParentCtl3D = False
ImageEnVersion = '4.0.0'
EnableInteractionHints = True
Align = alClient
TabOrder = 1
end
end
object Table1: TTable
AfterScroll = Table1AfterScroll
TableName = 'IMAGES.DB'
Left = 16
Top = 136
end
object DataSource1: TDataSource
AutoEdit = False
DataSet = Table1
Left = 64
Top = 136
end
object OpenImageEnDialog1: TOpenImageEnDialog
Filter =
'All graphics|*.jpg;*.jpeg;*.gif;*.tif;*.tiff;*.pcx;*.png;*.bmp;*' +
'.wmf;*.emf;*.ico;*.cur;*.avi|JPEG files (*.jpg;*.jpeg)|*.jpg;*.j' +
'peg|GIF files (*.gif)|*.gif|TIFF files (*.tif;*.tiff)|*.tif;*.ti' +
'ff|PCX files (*.pcx)|*.pcx|PNG files (*.png)|*.png|BMP files (*.' +
'bmp)|*.bmp|WMF files (*.wmf)|*.wmf|EMF files (*.emf)|*.emf|ICO f' +
'iles (*.ico)|*.ico|CUR files (*.cur)|*.cur|AVI files (*.avi)|*.a' +
'vi'
Left = 167
Top = 179
end
end