VistA-cprs/CPRS-Chart/fDeviceSelect.dfm

166 lines
3.7 KiB
Plaintext

inherited frmDeviceSelect: TfrmDeviceSelect
Left = 378
Top = 340
Caption = 'Orders Print Device Selection'
ClientHeight = 235
ClientWidth = 415
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
ExplicitWidth = 423
ExplicitHeight = 262
PixelsPerInch = 96
TextHeight = 13
object grpDevice: TGroupBox [0]
Left = 0
Top = 0
Width = 415
Height = 194
Align = alClient
Caption = 'Device'
TabOrder = 0
object cboDevice: TORComboBox
Left = 2
Top = 15
Width = 411
Height = 145
Style = orcsSimple
Align = alClient
AutoSelect = True
Caption = 'Device'
Color = clWindow
DropDownCount = 8
ItemHeight = 13
ItemTipColor = clWindow
ItemTipEnable = True
ListItemsOnly = False
LongList = True
LookupPiece = 0
MaxLength = 0
ParentShowHint = False
Pieces = '2,4'
ShowHint = True
Sorted = False
SynonymChars = '<>'
TabPositions = '30'
TabOrder = 0
OnChange = cboDeviceChange
OnNeedData = cboDeviceNeedData
CharsNeedMatch = 1
end
object pnlGBBottom: TPanel
Left = 2
Top = 160
Width = 411
Height = 32
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object lblMargin: TLabel
Left = 8
Top = 12
Width = 60
Height = 13
Caption = 'Right Margin'
end
object lblLength: TLabel
Left = 120
Top = 12
Width = 61
Height = 13
Caption = 'Page Length'
end
object txtRightMargin: TMaskEdit
Left = 72
Top = 6
Width = 33
Height = 19
AutoSize = False
EditMask = '99999;0; '
MaxLength = 5
TabOrder = 0
end
object txtPageLength: TMaskEdit
Left = 184
Top = 6
Width = 34
Height = 19
AutoSize = False
EditMask = '99999;0; '
MaxLength = 5
TabOrder = 1
end
end
end
object pnlBottom: TPanel [1]
Left = 0
Top = 194
Width = 415
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object cmdOK: TButton
Left = 257
Top = 11
Width = 72
Height = 22
Caption = 'OK'
Default = True
TabOrder = 0
OnClick = cmdOKClick
end
object cmdCancel: TButton
Left = 337
Top = 11
Width = 72
Height = 22
Cancel = True
Caption = 'Cancel'
TabOrder = 1
OnClick = cmdCancelClick
end
object chkDefault: TCheckBox
Left = 12
Top = 16
Width = 163
Height = 17
Caption = 'Save as user'#39's default printer'
TabOrder = 2
end
end
inherited amgrMain: TVA508AccessibilityManager
Data = (
(
'Component = grpDevice'
'Status = stsDefault')
(
'Component = cboDevice'
'Status = stsDefault')
(
'Component = pnlGBBottom'
'Status = stsDefault')
(
'Component = txtRightMargin'
'Status = stsDefault')
(
'Component = txtPageLength'
'Status = stsDefault')
(
'Component = pnlBottom'
'Status = stsDefault')
(
'Component = cmdOK'
'Status = stsDefault')
(
'Component = cmdCancel'
'Status = stsDefault')
(
'Component = chkDefault'
'Status = stsDefault')
(
'Component = frmDeviceSelect'
'Status = stsDefault'))
end
end