WebSVN – spacemission – Blame – /VCL_DELPHIX_D6/DXMapEdit.dfm

Rev	Author	Line No.	Line
4	daniel-mar	1	object DelphiXMapEditForm: TDelphiXMapEditForm
		2	Left = 320
		3	Top = 226
		4	Width = 618
		5	Height = 442
		6	Caption = 'Background Sprite Map Editor'
		7	Color = clBtnFace
		8	Font.Charset = DEFAULT_CHARSET
		9	Font.Color = clWindowText
		10	Font.Height = -11
		11	Font.Name = 'Tahoma'
		12	Font.Style = []
		13	OldCreateOrder = True
		14	Position = poScreenCenter
		15	OnCreate = FormCreate
		16	OnDestroy = FormDestroy
		17	PixelsPerInch = 96
		18	TextHeight = 13
		19	object pnlRight: TPanel
		20	Left = 467
		21	Top = 0
		22	Width = 143
		23	Height = 408
		24	Align = alRight
		25	BevelOuter = bvNone
		26	TabOrder = 0
		27	object CancelButton: TButton
		28	Left = 5
		29	Top = 40
		30	Width = 73
		31	Height = 25
		32	Cancel = True
		33	Caption = 'Cancel'
		34	ModalResult = 2
		35	TabOrder = 0
		36	end
		37	object DelphiXMapEditPropertiesPane: TPanel
		38	Left = 0
		39	Top = 72
		40	Width = 138
		41	Height = 267
		42	BevelOuter = bvNone
		43	BorderStyle = bsSingle
		44	TabOrder = 1
		45	end
		46	object OKButton: TButton
		47	Left = 5
		48	Top = 8
		49	Width = 73
		50	Height = 25
		51	Caption = 'OK'
		52	Default = True
		53	ModalResult = 1
		54	TabOrder = 2
		55	OnClick = OKButtonClick
		56	end
		57	end
		58	object pnlLeft: TPanel
		59	Left = 0
		60	Top = 0
		61	Width = 467
		62	Height = 408
		63	Align = alClient
		64	BevelOuter = bvNone
		65	BorderWidth = 8
		66	TabOrder = 1
		67	object pblBase: TPanel
		68	Left = 8
		69	Top = 8
		70	Width = 451
		71	Height = 392
		72	Align = alClient
		73	BevelOuter = bvNone
		74	BorderWidth = 4
		75	BorderStyle = bsSingle
		76	TabOrder = 0
		77	object Panel1: TPanel
		78	Left = 4
		79	Top = 61
		80	Width = 439
		81	Height = 323
		82	Align = alClient
		83	BevelOuter = bvNone
		84	BorderWidth = 1
		85	Caption = 'Panel1'
		86	TabOrder = 1
		87	object Splitter1: TSplitter
		88	Left = 114
		89	Top = 1
		90	Width = 3
		91	Height = 321
		92	Cursor = crHSplit
		93	end
		94	object PicturesToChip: TListBox
		95	Left = 1
		96	Top = 1
		97	Width = 113
		98	Height = 321
		99	Align = alLeft
		100	DragMode = dmAutomatic
		101	ItemHeight = 16
		102	PopupMenu = PopupMenu1
		103	Style = lbOwnerDrawVariable
		104	TabOrder = 0
		105	Visible = False
		106	OnDrawItem = PicturesToChipDrawItem
		107	OnMeasureItem = PicturesToChipMeasureItem
		108	end
		109	object ScrollBox1: TScrollBox
		110	Left = 117
		111	Top = 1
		112	Width = 321
		113	Height = 321
		114	Align = alClient
		115	TabOrder = 1
		116	object MapArea: TDrawGrid
		117	Left = 1
		118	Top = 1
		119	Width = 165
		120	Height = 165
		121	TabStop = False
		122	BorderStyle = bsNone
		123	DefaultColWidth = 32
		124	DefaultRowHeight = 32
		125	FixedCols = 0
		126	FixedRows = 0
		127	Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected]
		128	PopupMenu = PopupMenu2
		129	ScrollBars = ssNone
		130	TabOrder = 0
		131	Visible = False
		132	OnDblClick = MapAreaDblClick
		133	OnDragDrop = MapAreaDragDrop
		134	OnDragOver = MapAreaDragOver
		135	OnDrawCell = MapAreaDrawCell
		136	OnMouseDown = MapAreaMouseDown
		137	OnMouseMove = MapAreaMouseMove
		138	end
		139	end
		140	end
		141	object pnlLabels: TPanel
		142	Left = 4
		143	Top = 4
		144	Width = 439
		145	Height = 57
		146	Align = alTop
		147	BevelOuter = bvNone
		148	TabOrder = 0
		149	object BtnSetSize: TSpeedButton
		150	Left = 413
		151	Top = 3
		152	Width = 21
		153	Height = 46
		154	Hint = 'Set up size.'
		155	Glyph.Data = {
		156	F6000000424DF600000000000000760000002800000010000000100000000100
		157	0400000000008000000000000000000000001000000010000000000000000000
		158	BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
		159	FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
		160	DDDDDDDDDDDDDDD0DDDDDDDDDDDDDD080DDDDDDDDDDDD080DDDDDDDDDDDD080D
		161	DDDDDDDDDDD080DDDDDDDDDDDD080DDDDDDDDDDDD080DDDDDDDDDDD0080DDDDD
		162	DDDDDD0FF0DDDDDDDDDDDD0FF0DDDDDDDDDDDD0F0DDDDDDDDDDDDD00DDDDDDDD
		163	DDDDDD0DDDDDDDDDDDDDDD0DDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
		164	ParentShowHint = False
		165	ShowHint = True
		166	OnClick = BtnSetSizeClick
		167	end
		168	object LAreaOfChips: TLabel
		169	Left = 121
		170	Top = 44
		171	Width = 234
		172	Height = 13
		173	Caption = 'Area of Chips (doubleclick to properties change):'
		174	FocusControl = ScrollBox1
		175	Transparent = True
		176	end
		177	object LHeight: TLabel
		178	Left = 288
		179	Top = 31
		180	Width = 46
		181	Height = 13
		182	Caption = 'Chip size:'
		183	FocusControl = EHeight
		184	end
		185	object LImageToSet: TLabel
		186	Left = 5
		187	Top = 5
		188	Width = 109
		189	Height = 13
		190	Caption = 'Image by name to set:'
		191	FocusControl = ImageToSet
		192	end
		193	object LMapSizeX: TLabel
		194	Left = 242
		195	Top = 7
		196	Width = 45
		197	Height = 13
		198	Caption = 'Map size:'
		199	FocusControl = eMapSizeX
		200	end
		201	object LMapSizeY: TLabel
		202	Left = 347
		203	Top = 7
		204	Width = 6
		205	Height = 13
		206	Caption = 'x'
		207	FocusControl = eMapSizeY
		208	end
		209	object LPicturesToChip: TLabel
		210	Left = 5
		211	Top = 44
		212	Width = 42
		213	Height = 13
		214	Caption = 'Pictures:'
		215	FocusControl = PicturesToChip
		216	end
		217	object LWidth: TLabel
		218	Left = 370
		219	Top = 31
		220	Width = 6
		221	Height = 13
		222	Caption = 'x'
		223	FocusControl = EWidth
		224	end
		225	object EHeight: TEdit
		226	Left = 334
		227	Top = 28
		228	Width = 32
		229	Height = 21
		230	TabOrder = 0
		231	Text = '32'
		232	end
		233	object eMapSizeX: TSpinEdit
		234	Left = 293
		235	Top = 4
		236	Width = 50
		237	Height = 22
		238	MaxValue = 128
		239	MinValue = 1
		240	TabOrder = 1
		241	Value = 1
		242	end
		243	object eMapSizeY: TSpinEdit
		244	Left = 360
		245	Top = 4
		246	Width = 50
		247	Height = 22
		248	MaxValue = 128
		249	MinValue = 1
		250	TabOrder = 2
		251	Value = 1
		252	end
		253	object EWidth: TEdit
		254	Left = 378
		255	Top = 28
		256	Width = 32
		257	Height = 21
		258	TabOrder = 3
		259	Text = '32'
		260	end
		261	object ImageToSet: TComboBox
		262	Left = 5
		263	Top = 19
		264	Width = 153
		265	Height = 21
		266	Style = csDropDownList
		267	Enabled = False
		268	ItemHeight = 13
		269	TabOrder = 4
		270	OnChange = ImageToSetChange
		271	end
		272	end
		273	end
		274	end
		275	object PopupMenu1: TPopupMenu
		276	OnPopup = PopupMenu1Popup
		277	Left = 104
		278	Top = 320
		279	object Fillall1: TMenuItem
		280	Caption = 'Fill all'
		281	OnClick = Fillall1Click
		282	end
		283	end
		284	object PopupMenu2: TPopupMenu
		285	OnPopup = PopupMenu2Popup
		286	Left = 256
		287	Top = 200
		288	object ClearOneChip1: TMenuItem
		289	Caption = 'Clear One Chip'
		290	OnClick = ClearOneChip1Click
		291	end
		292	object Clear1: TMenuItem
		293	Caption = 'Clear All Chips'
		294	GroupIndex = 1
		295	OnClick = Clear1Click
		296	end
		297	end
		298	end

Subversion Repositories spacemission

spacemission/VCL_DELPHIX_D6/DXMapEdit.dfm – Rev 4