home *** CD-ROM | disk | FTP | other *** search
- object VarTextForm: TVarTextForm
- Left = 214
- Top = 111
- HelpContext = 108
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Variable Text'
- ClientHeight = 337
- ClientWidth = 306
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poOwnerFormCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 16
- Top = 4
- Width = 277
- Height = 53
- AutoSize = False
- Caption =
- 'Variable text allows you to specify diffferent text for each ele' +
- 'ment printed. When you specify variable text be sure to add tex' +
- 't for every element you want to print.'
- WordWrap = True
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 160
- Width = 289
- Height = 137
- Caption = 'Text'
- TabOrder = 0
- object AddBtn: TBitBtn
- Left = 19
- Top = 104
- Width = 75
- Height = 25
- Caption = '&Add'
- TabOrder = 1
- OnClick = AddBtnClick
- end
- object RemoveBtn: TBitBtn
- Left = 107
- Top = 104
- Width = 75
- Height = 25
- Caption = '&Remove'
- TabOrder = 2
- OnClick = RemoveBtnClick
- end
- object TextMemo: TMemo
- Left = 12
- Top = 20
- Width = 269
- Height = 77
- ScrollBars = ssBoth
- TabOrder = 0
- WordWrap = False
- OnChange = TextMemoChange
- end
- object PickTextBtn: TBitBtn
- Left = 195
- Top = 104
- Width = 75
- Height = 25
- Caption = '&Pick Text'
- TabOrder = 3
- OnClick = PickTextBtnClick
- end
- end
- object OkBtn: TBitBtn
- Left = 17
- Top = 308
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- ModalResult = 1
- TabOrder = 2
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333330000333333333333333333333333F33333333333
- 00003333344333333333333333388F3333333333000033334224333333333333
- 338338F3333333330000333422224333333333333833338F3333333300003342
- 222224333333333383333338F3333333000034222A22224333333338F338F333
- 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
- 33333338F83338F338F33333000033A33333A222433333338333338F338F3333
- 0000333333333A222433333333333338F338F33300003333333333A222433333
- 333333338F338F33000033333333333A222433333333333338F338F300003333
- 33333333A222433333333333338F338F00003333333333333A22433333333333
- 3338F38F000033333333333333A223333333333333338F830000333333333333
- 333A333333333333333338330000333333333333333333333333333333333333
- 0000}
- NumGlyphs = 2
- end
- object CancelBtn: TBitBtn
- Left = 109
- Top = 308
- Width = 75
- Height = 25
- Caption = '&Cancel'
- TabOrder = 3
- Kind = bkCancel
- end
- object HelpBtn: TBitBtn
- Left = 201
- Top = 308
- Width = 75
- Height = 25
- TabOrder = 4
- Kind = bkHelp
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 48
- Width = 281
- Height = 105
- Caption = 'Variable Text List'
- TabOrder = 1
- object VarTextList: TDragDropListBox
- Left = 9
- Top = 16
- Width = 264
- Height = 81
- DragDropDelete = True
- DragDropEnabled = True
- DragDropInsert = True
- ItemHeight = 13
- TabOrder = 0
- end
- end
- object Timer: TTimer
- Interval = 500
- OnTimer = TimerTimer
- Left = 272
- Top = 264
- end
- end
-