You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
RnQ/RnQ/automsgDlg.dfm

166 lines
3.9 KiB
Plaintext

object automsgFrm: TautomsgFrm
Left = 310
Top = 149
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Auto message'
ClientHeight = 324
ClientWidth = 198
Color = clBtnFace
Constraints.MinWidth = 200
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
DesignSize = (
198
324)
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 6
Top = 120
Width = 187
Height = 3
Anchors = [akLeft, akTop, akRight]
Visible = False
ExplicitWidth = 193
end
object Panel1: TPanel
Left = 8
Top = 129
Width = 182
Height = 17
Anchors = [akLeft, akTop, akRight]
BevelKind = bkFlat
BevelOuter = bvNone
Caption = 'predefined messages'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object msgBox: TMemo
Left = 0
Top = 0
Width = 198
Height = 89
Align = alTop
BevelInner = bvSpace
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 0
OnKeyPress = msgBoxKeyPress
end
object popupChk: TCheckBox
Left = 8
Top = 285
Width = 189
Height = 17
Anchors = [akLeft, akBottom]
Caption = 'pop up on status change'
TabOrder = 8
end
object ok2enterChk: TCheckBox
Left = 8
Top = 302
Width = 189
Height = 17
Anchors = [akLeft, akBottom]
Caption = 'ok on double ENTER'
TabOrder = 9
OnClick = ok2enterChkClick
end
object PredBox: TVirtualDrawTree
Left = 8
Top = 148
Width = 182
Height = 106
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
DefaultNodeHeight = 15
Header.AutoSizeIndex = 0
Header.DefaultHeight = 17
Header.Font.Charset = DEFAULT_CHARSET
Header.Font.Color = clWindowText
Header.Font.Height = -11
Header.Font.Name = 'Tahoma'
Header.Font.Style = []
Header.Height = 17
Header.MainColumn = -1
Header.Options = [hoColumnResize, hoDrag]
TabOrder = 4
TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning]
TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages]
TreeOptions.SelectionOptions = [toFullRowSelect, toMiddleClickSelect, toRightClickSelect]
OnChange = PredBoxChange
OnDrawNode = PredBoxDrawNode
Columns = <>
end
object nameBox: TEdit
Left = 8
Top = 235
Width = 182
Height = 21
Anchors = [akLeft, akTop, akRight]
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 5
Visible = False
OnKeyPress = nameBoxKeyPress
end
object okBtn: TRnQButton
Left = 7
Top = 95
Width = 83
Height = 22
Caption = 'Ok'
TabOrder = 1
OnClick = okBtnClick
ImageName = 'ok'
end
object cancelBtn: TRnQButton
Left = 110
Top = 95
Width = 81
Height = 22
Caption = 'Cancel'
TabOrder = 2
OnClick = cancelBtnClick
ImageName = 'cancel'
end
object saveBtn: TRnQButton
Left = 7
Top = 260
Width = 83
Height = 22
Hint = 'add current message to predefined messages'
Caption = 'Save'
TabOrder = 6
OnClick = saveBtnClick
ImageName = 'save'
end
object deleteBtn: TRnQButton
Left = 110
Top = 260
Width = 81
Height = 22
Hint = 'delete selected predefined message'
Caption = 'Delete'
TabOrder = 7
OnClick = deleteBtnClick
ImageName = 'delete'
end
end