mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-21 04:22:34 +02:00
112 lines
2.1 KiB
Plaintext
112 lines
2.1 KiB
Plaintext
object EasyDockMain: TEasyDockMain
|
|
Left = 680
|
|
Height = 285
|
|
Top = 125
|
|
Width = 461
|
|
ActiveControl = buDump
|
|
Caption = 'EasyDockMain'
|
|
ClientHeight = 285
|
|
ClientWidth = 461
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
OnCreate = FormCreate
|
|
LCLVersion = '0.9.27'
|
|
object sb: TStatusBar
|
|
Left = 0
|
|
Height = 20
|
|
Top = 265
|
|
Width = 461
|
|
Panels = <>
|
|
end
|
|
object ToolBar1: TToolBar
|
|
Left = 0
|
|
Height = 29
|
|
Top = 0
|
|
Width = 461
|
|
Caption = 'ToolBar1'
|
|
TabOrder = 1
|
|
object Shape1: TShape
|
|
Left = 1
|
|
Height = 22
|
|
Top = 2
|
|
Width = 21
|
|
Brush.Color = clRed
|
|
OnMouseUp = Shape1MouseUp
|
|
end
|
|
object Shape2: TShape
|
|
Left = 22
|
|
Height = 22
|
|
Top = 2
|
|
Width = 24
|
|
Brush.Color = clLime
|
|
OnMouseUp = Shape1MouseUp
|
|
end
|
|
object Shape4: TShape
|
|
Left = 46
|
|
Height = 22
|
|
Top = 2
|
|
Width = 24
|
|
Brush.Color = clYellow
|
|
OnMouseUp = Shape1MouseUp
|
|
end
|
|
object Shape3: TShape
|
|
Left = 70
|
|
Height = 22
|
|
Top = 2
|
|
Width = 24
|
|
Brush.Color = clBlue
|
|
OnMouseUp = Shape1MouseUp
|
|
end
|
|
object lbDock: TLabel
|
|
Left = 152
|
|
Height = 22
|
|
Top = 2
|
|
Width = 97
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = 'Drag Me!'
|
|
DragKind = dkDock
|
|
DragMode = dmAutomatic
|
|
ParentColor = False
|
|
end
|
|
object buDump: TButton
|
|
Left = 94
|
|
Height = 22
|
|
Top = 2
|
|
Width = 58
|
|
Caption = 'Dump'
|
|
OnClick = buDumpClick
|
|
TabOrder = 0
|
|
end
|
|
object edDock: TEdit
|
|
Left = 249
|
|
Height = 22
|
|
Top = 2
|
|
Width = 80
|
|
DragKind = dkDock
|
|
TabOrder = 1
|
|
Text = 'Drag Me!'
|
|
end
|
|
object buManDock: TButton
|
|
Left = 329
|
|
Height = 22
|
|
Top = 2
|
|
Width = 75
|
|
Caption = 'buManDock'
|
|
OnClick = buManDockClick
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object pnlDocker: TPanel
|
|
Left = 0
|
|
Height = 236
|
|
Top = 29
|
|
Width = 461
|
|
Align = alClient
|
|
Caption = 'Dock here!'
|
|
TabOrder = 2
|
|
UseDockManager = False
|
|
OnDockOver = DockerDockOver
|
|
end
|
|
end
|