lazarus/examples/codepageconverter/mainunit.lfm
2004-12-27 12:56:42 +00:00

211 lines
4.2 KiB
Plaintext

object LazConverterForm: TLazConverterForm
Caption = 'Codepage LazConverter for PAS, LFM, LRS & INC files v0.0.4'
ClientHeight = 463
ClientWidth = 612
Constraints.MinHeight = 463
Constraints.MinWidth = 578
OnResize = LazConverterFormResize
OnShow = Form1Show
PixelsPerInch = 94
Position = poScreenCenter
HorzScrollBar.Page = 613
VertScrollBar.Page = 464
Left = 303
Height = 463
Top = 125
Width = 612
object Panel1: TPanel
Align = alTop
ClientHeight = 192
ClientWidth = 612
FullRepaint = False
TabOrder = 0
Height = 192
Width = 612
object Label1: TLabel
Caption = 'Path to your project:'
Left = 8
Height = 19
Top = 8
Width = 168
end
object Edit1: TEdit
Anchors = [akTop, akLeft, akRight]
TabOrder = 1
Left = 8
Height = 23
Top = 32
Width = 513
end
object Button1: TButton
Anchors = [akTop, akRight]
Caption = 'Path'
OnClick = Button1Click
TabOrder = 2
Left = 530
Height = 23
Top = 32
Width = 75
end
object Label2: TLabel
Caption = 'Convert From:'
Left = 8
Height = 15
Top = 56
Width = 159
end
object ComboBox1: TComboBox
MaxLength = 0
TabOrder = 4
Left = 8
Height = 25
Top = 72
Width = 200
end
object Label3: TLabel
Caption = 'Convert To:'
Left = 216
Height = 15
Top = 56
Width = 123
end
object ComboBox2: TComboBox
MaxLength = 0
TabOrder = 6
Left = 216
Height = 25
Top = 72
Width = 200
end
object CheckBox1: TCheckBox
AllowGrayed = True
AutoSize = True
Caption = 'Include subdirectories'
OnClick = CheckBox1Click
TabOrder = 7
Left = 424
Height = 23
Top = 72
Width = 176
end
object Button2: TButton
Caption = 'Search'
OnClick = Button2Click
TabOrder = 8
Left = 8
Height = 25
Top = 112
Width = 75
end
object Button3: TButton
Caption = 'Convert'
OnClick = Button3Click
TabOrder = 9
Left = 88
Height = 25
Top = 112
Width = 123
end
object ProgressBar1: TProgressBar
Align = alBottom
Max = 100
TabOrder = 10
TabStop = True
Left = 1
Height = 17
Top = 174
Width = 610
end
object Label5: TLabel
Caption = 'Directory:'
Left = 8
Height = 17
Top = 149
Width = 65
end
object Label6: TLabel
Anchors = [akTop, akLeft, akRight]
Caption = 'Ready...'
Left = 80
Height = 17
Top = 149
Width = 521
end
end
object ListView1: TListView
Align = alClient
Columns = <
item
Caption = 'FileName'
Width = 450
end
item
AutoSize = True
Caption = 'Type'
Width = 0
end>
PopupMenu = PopupMenu1
ViewStyle = vsReport
OnSelectItem = ListView1SelectItem
Height = 232
Top = 192
Width = 612
end
object Panel2: TPanel
Align = alBottom
ClientHeight = 39
ClientWidth = 612
FullRepaint = False
TabOrder = 2
Height = 39
Top = 424
Width = 612
object Button4: TButton
Caption = 'Remove from conversion'
OnClick = Button4Click
TabOrder = 0
Left = 8
Height = 25
Top = 8
Width = 192
end
object Button5: TButton
Caption = 'View'
OnClick = Button5Click
TabOrder = 1
Left = 208
Height = 25
Top = 8
Width = 127
end
end
object SelectDirectoryDialog1: TSelectDirectoryDialog
Title = 'Select Directory'
FilterIndex = 0
left = 8
top = 480
end
object FileSearch1: TFileSearch
OnFileFind = FileSearch1FileFind
OnChangeFolder = FileSearch1ChangeFolder
OnFinish = FileSearch1Finish
left = 8
top = 448
end
object PopupMenu1: TPopupMenu
left = 224
top = 8
object MenuItem1: TMenuItem
Caption = 'View File'
OnClick = Button5Click
end
object MenuItem2: TMenuItem
Caption = '-'
end
object MenuItem3: TMenuItem
Caption = 'Remove From Conversion'
OnClick = Button4Click
end
end
end