home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 September
/
Dpcb0999.iso
/
Business
/
Empire
/
_SETUP.1
/
EBRepDesigner.exe
/
0
/
RCDATA
/
TFRMSRWLABEL
/
TFRMSRWLABEL.txt
Wrap
Text File
|
1999-06-21
|
4KB
|
183 lines
object frmSrwLabel: TfrmSrwLabel
Left = 310
Top = 15
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Choose Label Format'
ClientHeight = 258
ClientWidth = 313
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
KeyPreview = True
PixelsPerInch = 96
Position = poScreenCenter
OnCreate = FormCreate
OnKeyDown = FormKeyDown
TextHeight = 13
object panMain: TPanel
Left = 4
Top = 4
Width = 211
Height = 251
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object Label4: TLabel
Left = 8
Top = 10
Width = 51
Height = 13
Caption = '&Category'
FocusControl = cmbLabels
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object cmbLabels: TComboBox
Left = 64
Top = 8
Width = 137
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'Avery Standard'
'Avery Mini'
'Avery A4'
'Avery A4 Mini'
'Avery Continuous')
TabOrder = 0
OnChange = cmbLabelsChange
end
object grdLabels: TDBGrid
Left = 8
Top = 36
Width = 193
Height = 205
DataSource = srcLabels
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Options = [dgTabs, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
TabOrder = 1
TitleFont.Color = clNavy
TitleFont.Height = -11
TitleFont.Name = 'Arial'
TitleFont.Style = [fsBold]
OnDblClick = cmdOKClick
end
end
object cmdOK: TBitBtn
Left = 220
Top = 4
Width = 89
Height = 25
Caption = '&OK'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = cmdOKClick
Style = bsNew
end
object cmdCancel: TBitBtn
Left = 220
Top = 36
Width = 89
Height = 25
Caption = '&Cancel'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 2
ParentFont = False
TabOrder = 2
Style = bsNew
end
object cmdHelp: TBitBtn
Left = 220
Top = 68
Width = 89
Height = 25
Caption = '&Help'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = cmdHelpClick
Style = bsNew
end
object qryLabels: TQuery
SQL.Strings = (
'')
RequestLive = True
Left = 232
Top = 224
object qryLabelsVendor: TStringField
FieldName = 'Vendor'
Visible = False
Size = 10
end
object qryLabelsPaper: TStringField
FieldName = 'Paper'
Visible = False
Size = 3
end
object qryLabelsDesc: TStringField
FieldName = 'Desc'
Size = 35
end
object qryLabelsTop: TFloatField
FieldName = 'Top'
Visible = False
end
object qryLabelsLeft: TFloatField
FieldName = 'Left'
Visible = False
end
object qryLabelsHeight: TFloatField
FieldName = 'Height'
Visible = False
end
object qryLabelsWidth: TFloatField
FieldName = 'Width'
Visible = False
end
object qryLabelsVertGap: TFloatField
FieldName = 'VertGap'
Visible = False
end
object qryLabelsHorzGap: TFloatField
FieldName = 'HorzGap'
Visible = False
end
object qryLabelsAcross: TSmallintField
FieldName = 'Across'
Visible = False
end
object qryLabelsDown: TSmallintField
FieldName = 'Down'
Visible = False
end
end
object srcLabels: TDataSource
DataSet = qryLabels
Left = 264
Top = 224
end
end