Files
lazarus-ccr/applications/cactusjukebox/source/cleanlibrary.lfm
sekelsenmat 6f8c048343 Adds the cactus jukebox to the lazarus ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1748 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2011-07-21 09:39:48 +00:00

345 lines
6.9 KiB
Plaintext

object FrmCleanLibrary: TFrmCleanLibrary
Left = 360
Height = 305
Top = 199
Width = 475
Caption = 'FrmCleanLibrary'
ClientHeight = 305
ClientWidth = 475
FormStyle = fsStayOnTop
OnCreate = FormCreate
OnDestroy = FormDestroy
LCLVersion = '0.9.25'
object Panel1: TPanel
Height = 312
Top = -8
Width = 472
BevelOuter = bvNone
ClientHeight = 312
ClientWidth = 472
TabOrder = 0
object Label1: TLabel
Left = 8
Height = 19
Top = 16
Width = 65
Caption = 'Search in:'
ParentColor = False
end
object Label2: TLabel
Left = 8
Height = 19
Top = 152
Width = 313
Caption = 'do not remove files with the following extensions:'
ParentColor = False
end
object btnReset: TButton
Left = 384
Height = 25
Top = 88
Width = 75
Caption = 'R&eset'
OnClick = btnResetClick
TabOrder = 3
end
object btnRemove: TButton
Left = 384
Height = 25
Top = 56
Width = 75
Caption = '&Remove'
OnClick = btnRemoveClick
TabOrder = 2
end
object dirlistview: TListBox
Left = 8
Height = 96
Top = 40
Width = 368
OnClick = dirlistviewClick
Sorted = True
TabOrder = 1
TopIndex = -1
end
object txtNotToRemove: TEdit
Left = 8
Height = 23
Top = 176
Width = 368
TabOrder = 4
Text = 'wav mp3 ogg'
end
object chkFolders: TCheckBox
Left = 8
Height = 19
Top = 216
Width = 161
Caption = 'remove empty &folders'
Checked = True
State = cbChecked
TabOrder = 5
end
object btnDisplay: TButton
Left = 232
Height = 25
Top = 256
Width = 112
Caption = '&Display Files'
Default = True
OnClick = btnDisplayClick
TabOrder = 0
end
object btnBack: TButton
Left = 104
Height = 25
Top = 256
Width = 112
Cancel = True
Caption = '&Back'
OnClick = btnBackClick
TabOrder = 6
end
end
object Panel2: TPanel
Height = 304
Width = 472
BevelOuter = bvNone
Caption = 'Panel2'
ClientHeight = 304
ClientWidth = 472
TabOrder = 1
Visible = False
object Label3: TLabel
Left = 10
Height = 19
Top = 8
Width = 173
Caption = 'files && folders to remove:'
ParentColor = False
end
object lstRemove: TListBox
Left = 8
Height = 232
Top = 24
Width = 422
OnClick = lstRemoveClick
TabOrder = 1
TopIndex = -1
end
object btnBack2: TButton
Left = 24
Height = 25
Top = 264
Width = 75
Caption = '&Back'
OnClick = btnBack2Click
TabOrder = 3
end
object btnUnselect: TButton
Left = 440
Height = 32
Top = 41
Width = 24
Caption = '-'
Font.Height = -16
Font.Name = 'Sans'
Font.Style = [fsBold]
OnClick = btnUnselectClick
TabOrder = 2
end
object btnRemoveFromDisk: TButton
Left = 256
Height = 25
Top = 264
Width = 160
Caption = '&Remove from disk'
Color = clRed
OnClick = btnRemoveFromDiskClick
TabOrder = 0
end
object pnlProgress: TPanel
Left = 136
Height = 32
Top = 112
Width = 160
BevelOuter = bvLowered
Caption = 'please wait...'
TabOrder = 4
Visible = False
end
end
end
object FrmCleanLibrary: TFrmCleanLibrary
Left = 360
Height = 305
Top = 199
Width = 475
Caption = 'FrmCleanLibrary'
ClientHeight = 305
ClientWidth = 475
FormStyle = fsStayOnTop
OnCreate = FormCreate
OnDestroy = FormDestroy
LCLVersion = '0.9.25'
object Panel1: TPanel
Height = 312
Top = -8
Width = 472
BevelOuter = bvNone
ClientHeight = 312
ClientWidth = 472
TabOrder = 0
object Label1: TLabel
Left = 8
Height = 19
Top = 16
Width = 65
Caption = 'Search in:'
ParentColor = False
end
object Label2: TLabel
Left = 8
Height = 19
Top = 152
Width = 313
Caption = 'do not remove files with the following extensions:'
ParentColor = False
end
object btnReset: TButton
Left = 384
Height = 25
Top = 88
Width = 75
Caption = 'R&eset'
OnClick = btnResetClick
TabOrder = 3
end
object btnRemove: TButton
Left = 384
Height = 25
Top = 56
Width = 75
Caption = '&Remove'
OnClick = btnRemoveClick
TabOrder = 2
end
object dirlistview: TListBox
Left = 8
Height = 96
Top = 40
Width = 368
OnClick = dirlistviewClick
Sorted = True
TabOrder = 1
TopIndex = -1
end
object txtNotToRemove: TEdit
Left = 8
Height = 23
Top = 176
Width = 368
TabOrder = 4
Text = 'wav mp3 ogg'
end
object chkFolders: TCheckBox
Left = 8
Height = 19
Top = 216
Width = 161
Caption = 'remove empty &folders'
Checked = True
State = cbChecked
TabOrder = 5
end
object btnDisplay: TButton
Left = 232
Height = 25
Top = 256
Width = 112
Caption = '&Display Files'
Default = True
OnClick = btnDisplayClick
TabOrder = 0
end
object btnBack: TButton
Left = 104
Height = 25
Top = 256
Width = 112
Cancel = True
Caption = '&Back'
OnClick = btnBackClick
TabOrder = 6
end
end
object Panel2: TPanel
Height = 304
Width = 472
BevelOuter = bvNone
Caption = 'Panel2'
ClientHeight = 304
ClientWidth = 472
TabOrder = 1
Visible = False
object Label3: TLabel
Left = 10
Height = 19
Top = 8
Width = 173
Caption = 'files && folders to remove:'
ParentColor = False
end
object lstRemove: TListBox
Left = 8
Height = 232
Top = 24
Width = 422
OnClick = lstRemoveClick
TabOrder = 1
TopIndex = -1
end
object btnBack2: TButton
Left = 24
Height = 25
Top = 264
Width = 75
Caption = '&Back'
OnClick = btnBack2Click
TabOrder = 3
end
object btnUnselect: TButton
Left = 440
Height = 32
Top = 41
Width = 24
Caption = '-'
Font.Height = -16
Font.Name = 'Sans'
Font.Style = [fsBold]
OnClick = btnUnselectClick
TabOrder = 2
end
object btnRemoveFromDisk: TButton
Left = 256
Height = 25
Top = 264
Width = 160
Caption = '&Remove from disk'
Color = clRed
OnClick = btnRemoveFromDiskClick
TabOrder = 0
end
object pnlProgress: TPanel
Left = 136
Height = 32
Top = 112
Width = 160
BevelOuter = bvLowered
Caption = 'please wait...'
TabOrder = 4
Visible = False
end
end
end