home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Freelog 114
/
FreelogNo114-MarsAvril2013.iso
/
Systeme
/
ArsClip
/
ArsClip.exe
/
UnitFrmPasteSelected.dfm
< prev
next >
Wrap
Text File
|
2012-04-02
|
4KB
|
159 lines
object FrmPasteSelected: TFrmPasteSelected
Left = 322
Top = 271
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderIcons = []
Caption = 'ArsClip - Paste Selected Items'
ClientHeight = 356
ClientWidth = 403
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnActivate = FormActivate
OnKeyDown = FormKeyDown
OnKeyPress = FormKeyPress
OnKeyUp = FormKeyUp
OnShow = FormShow
DesignSize = (
403
356)
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 88
Top = 16
Width = 183
Height = 13
Caption = 'Click to toggle, Drag to multiple select '
end
object SpeedButton1: TSpeedButton
Left = 13
Top = 13
Width = 25
Height = 21
Hint = 'Select All'
Caption = '+'
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 45
Top = 13
Width = 26
Height = 21
Hint = 'Clear All'
Caption = '-'
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 323
Top = 40
Width = 69
Height = 25
Anchors = [akTop]
GroupIndex = 1
Caption = '&Paste'
Glyph.Data = {
A2010000424DA2010000000000003600000028000000090000000D0000000100
1800000000006C010000330B0000330B00000000000000000000FEFDFCFEFDFC
FEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFC00FEFDFCFEFDFCFEFDFCFE
FDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFC00FEFDFCFEFDFC676767676767F7F7
F7FEFDFCFEFDFCFEFDFCFEFDFC00FEFDFCFEFDFC676767676767676767F7F7F7
FEFDFCFEFDFCFEFDFC00FEFDFCFEFDFC676767676767676767676767EFEFEFFE
FDFCFEFDFC00FEFDFCFEFDFC676767676767676767676767676767EFEFEFFEFD
FC00FEFDFCFEFDFC676767676767676767676767676767676767FEFDFC00FEFD
FCFEFDFC676767676767676767676767676767EFEFEFFEFDFC00FEFDFCFEFDFC
676767676767676767676767EFEFEFFEFDFCFEFDFC00FEFDFCFEFDFC67676767
6767676767F7F7F7FEFDFCFEFDFCFEFDFC00FEFDFCFEFDFC676767676767F7F7
F7FEFDFCFEFDFCFEFDFCFEFDFC00FEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFC
FEFDFCFEFDFCFEFDFC00FEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFEFDFCFE
FDFCFEFDFC00}
Layout = blGlyphRight
OnClick = SpeedButton3Click
end
object lbHistory: TListBox
Left = 13
Top = 40
Width = 299
Height = 294
Margins.Left = 6
Margins.Right = 6
Style = lbOwnerDrawVariable
Anchors = [akLeft, akTop, akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ItemHeight = 13
MultiSelect = True
ParentFont = False
TabOrder = 0
OnDrawItem = lbHistoryDrawItem
OnMeasureItem = lbHistoryMeasureItem
OnMouseDown = lbHistoryMouseDown
OnMouseMove = lbHistoryMouseMove
OnMouseUp = lbHistoryMouseUp
end
object btnPaste: TButton
Left = 331
Top = 252
Width = 64
Height = 25
Anchors = [akTop, akRight]
Caption = 'Paste'
TabOrder = 1
Visible = False
end
object btnCancel: TButton
Left = 321
Top = 79
Width = 69
Height = 25
Anchors = [akTop]
Caption = '&Cancel'
TabOrder = 2
OnClick = btnCancelClick
end
object cbPasteReverse: TCheckBox
Left = 40
Top = 340
Width = 145
Height = 17
Anchors = [akLeft, akBottom]
Caption = 'Paste in Reverse order'
TabOrder = 3
Visible = False
end
object pmPaste: TPopupMenu
Left = 348
Top = 156
object Paste1: TMenuItem
Caption = 'Paste'
OnClick = Paste1Click
end
object PasteinReverse1: TMenuItem
Caption = 'Paste in Reverse'
OnClick = PasteinReverse1Click
end
object ClipboardOnly1: TMenuItem
Caption = 'Clipboard Only'
OnClick = ClipboardOnly1Click
end
object ClipboardOnlyinReverse1: TMenuItem
Caption = 'Clipboard Only in Reverse'
OnClick = ClipboardOnlyinReverse1Click
end
end
end