mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-29 15:22:44 +02:00
96 lines
2.1 KiB
Plaintext
96 lines
2.1 KiB
Plaintext
object Form1: TForm1
|
|
Left = 353
|
|
Height = 353
|
|
Top = 194
|
|
Width = 535
|
|
BorderStyle = bsSingle
|
|
Caption = 'TLookupStringList Demo'
|
|
ClientHeight = 353
|
|
ClientWidth = 535
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object btnDedupeMemo: TButton
|
|
Left = 346
|
|
Height = 25
|
|
Top = 72
|
|
Width = 183
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'Dedupe Memo'
|
|
OnClick = btnDedupeMemoClick
|
|
TabOrder = 0
|
|
end
|
|
object Memo: TMemo
|
|
Left = 0
|
|
Height = 281
|
|
Top = 72
|
|
Width = 336
|
|
ScrollBars = ssAutoBoth
|
|
TabOrder = 1
|
|
end
|
|
object lblTime: TLabel
|
|
Left = 16
|
|
Height = 18
|
|
Top = 48
|
|
Width = 34
|
|
Caption = 'Time:'
|
|
ParentColor = False
|
|
end
|
|
object lblLines: TLabel
|
|
Left = 130
|
|
Height = 18
|
|
Top = 48
|
|
Width = 105
|
|
Caption = 'Duplicated Lines:'
|
|
ParentColor = False
|
|
end
|
|
object SpinEdit1: TSpinEdit
|
|
Left = 8
|
|
Height = 32
|
|
Top = 8
|
|
Width = 94
|
|
Increment = 1000
|
|
MaxValue = 1000000000
|
|
TabOrder = 2
|
|
end
|
|
object btnGenerate: TButton
|
|
Left = 112
|
|
Height = 25
|
|
Top = 8
|
|
Width = 125
|
|
Caption = 'Generate Data'
|
|
OnClick = btnGenerateClick
|
|
TabOrder = 3
|
|
end
|
|
object btnDedupeFile: TButton
|
|
AnchorSideLeft.Control = btnDedupeMemo
|
|
AnchorSideRight.Control = btnDedupeMemo
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 346
|
|
Height = 32
|
|
Top = 232
|
|
Width = 183
|
|
Anchors = [akTop, akLeft, akRight]
|
|
Caption = 'Create File and Dedupe it'
|
|
OnClick = btnDedupeFileClick
|
|
TabOrder = 4
|
|
end
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = btnDedupeFile
|
|
AnchorSideRight.Control = btnDedupeFile
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = btnDedupeFile
|
|
Left = 346
|
|
Height = 96
|
|
Top = 136
|
|
Width = 183
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
AutoSize = False
|
|
Caption = 'Deduplicating from a file is much faster than using a GUI control. Use the button below to see the whole process.'
|
|
ParentColor = False
|
|
WordWrap = True
|
|
end
|
|
end
|