WebSVN – winbugtracker – Blame – /trunk/BugtrackerMain.dfm

Rev	Author	Line No.	Line
4	daniel-mar	1	object frmBugtracker: TfrmBugtracker
		2	Left = 0
		3	Top = 0
		4	Caption = 'ViaThinkSoft Bugtracker f'#252'r Windows'
		5	ClientHeight = 498
		6	ClientWidth = 751
		7	Color = clBtnFace
		8	Font.Charset = DEFAULT_CHARSET
		9	Font.Color = clWindowText
		10	Font.Height = -11
		11	Font.Name = 'Tahoma'
		12	Font.Style = []
		13	Menu = MainMenu1
		14	OldCreateOrder = False
		15	Position = poScreenCenter
		16	OnCreate = FormCreate
		17	PixelsPerInch = 96
		18	TextHeight = 13
		19	object Splitter1: TSplitter
		20	Left = 249
		21	Top = 0
		22	Height = 498
		23	ExplicitLeft = 0
		24	ExplicitTop = 136
		25	ExplicitHeight = 100
		26	end
		27	object Panel1: TPanel
		28	Left = 0
		29	Top = 0
		30	Width = 249
		31	Height = 498
		32	Align = alLeft
		33	TabOrder = 0
		34	DesignSize = (
		35	249
		36	498)
		37	object DBGrid1: TDBGrid
		38	Left = 8
		39	Top = 35
		40	Width = 233
		41	Height = 406
		42	Anchors = [akLeft, akTop, akRight, akBottom]
		43	DataSource = dsBugs
		44	ReadOnly = True
		45	TabOrder = 0
		46	TitleFont.Charset = DEFAULT_CHARSET
		47	TitleFont.Color = clWindowText
		48	TitleFont.Height = -11
		49	TitleFont.Name = 'Tahoma'
		50	TitleFont.Style = []
		51	Columns = <
		52	item
		53	Expanded = False
		54	FieldName = 'id'
		55	Width = 46
		56	Visible = True
		57	end
		58	item
		59	Expanded = False
		60	FieldName = 'titel'
		61	Width = 111
		62	Visible = True
		63	end
		64	item
		65	Expanded = False
		66	FieldName = 'wichtigkeit'
		67	Width = 36
		68	Visible = True
		69	end>
		70	end
		71	object ComboBox1: TComboBox
		72	Left = 8
		73	Top = 8
		74	Width = 233
		75	Height = 21
		76	Style = csDropDownList
		77	Anchors = [akLeft, akTop, akRight]
		78	ItemHeight = 13
		79	ItemIndex = 0
		80	TabOrder = 1
		81	Text = 'Meine offenen Bugs (nach Wichtigkeit)'
		82	OnChange = ComboBox1Change
		83	Items.Strings = (
		84	'Meine offenen Bugs (nach Wichtigkeit)'
		85	'Alle offenen Bugs (nach Wichtigkeit)'
		86	'Gel'#246'st ohne Ver'#246'ffentlichung (nach L'#246'sungsdatum)'
		87	'Gel'#246'st und Ver'#246'ffentlicht (nach Version und L'#246'sungsdatum)'
		88	'Alle Bugs (nach Er'#246'ffnungsdatum)')
		89	end
		90	object DBNavigator2: TDBNavigator
		91	Left = 11
		92	Top = 456
		93	Width = 232
		94	Height = 25
		95	DataSource = dsBugs
		96	VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
		97	Anchors = [akLeft, akRight, akBottom]
		98	TabOrder = 2
		99	end
		100	end
		101	object Panel2: TPanel
		102	Left = 252
		103	Top = 0
		104	Width = 499
		105	Height = 498
		106	Align = alClient
		107	TabOrder = 1
		108	DesignSize = (
		109	499
		110	498)
		111	object Label1: TLabel
		112	Left = 15
		113	Top = 53
		114	Width = 50
		115	Height = 13
		116	Caption = 'Bearbeiter'
		117	end
		118	object Label2: TLabel
		119	Left = 15
		120	Top = 149
		121	Width = 20
		122	Height = 13
		123	Caption = 'Titel'
		124	end
		125	object Label3: TLabel
		126	Left = 240
		127	Top = 53
		128	Width = 33
		129	Height = 13
		130	Caption = 'Erstellt'
		131	end
		132	object Label4: TLabel
		133	Left = 240
		134	Top = 101
		135	Width = 29
		136	Height = 13
		137	Caption = 'Gefixt'
		138	end
		139	object Label5: TLabel
		140	Left = 15
		141	Top = 101
		142	Width = 28
		143	Height = 13
		144	Caption = 'Modul'
		145	end
		146	object Label6: TLabel
		147	Left = 240
		148	Top = 149
		149	Width = 119
		150	Height = 13
		151	Caption = 'Ver'#246'ffentlicht als Version'
		152	end
		153	object DBNavigator1: TDBNavigator
		154	Left = 15
		155	Top = 16
		156	Width = 224
		157	Height = 25
		158	DataSource = dsBugs
		159	VisibleButtons = [nbInsert, nbDelete, nbPost, nbCancel]
		160	TabOrder = 0
		161	end
		162	object DBRichEdit1: TDBRichEdit
		163	Left = 15
		164	Top = 248
		165	Width = 471
		166	Height = 233
		167	Anchors = [akLeft, akTop, akRight, akBottom]
		168	DataField = 'beschreibung'
		169	DataSource = dsBugs
		170	TabOrder = 9
		171	end
		172	object DBEdit1: TDBEdit
		173	Left = 15
		174	Top = 168
		175	Width = 186
		176	Height = 21
		177	DataField = 'titel'
		178	DataSource = dsBugs
		179	TabOrder = 5
		180	end
		181	object DBLookupComboBox1: TDBLookupComboBox
		182	Left = 15
		183	Top = 72
		184	Width = 186
		185	Height = 21
		186	DataField = 'bearbeiter'
		187	DataSource = dsBugs
		188	KeyField = 'id'
		189	ListField = 'name'
		190	ListSource = dsMitarbeiter
		191	NullValueKey = 46
		192	TabOrder = 1
		193	end
		194	object DBEdit2: TDBEdit
		195	Left = 240
		196	Top = 72
		197	Width = 155
		198	Height = 21
		199	TabStop = False
		200	Color = clBtnFace
		201	DataField = 'erstellt'
		202	DataSource = dsBugs
		203	ReadOnly = True
		204	TabOrder = 2
		205	end
		206	object DBEdit3: TDBEdit
		207	Left = 240
		208	Top = 120
		209	Width = 155
		210	Height = 21
		211	TabStop = False
		212	Color = clBtnFace
		213	DataField = 'fixdatum'
		214	DataSource = dsBugs
		215	ReadOnly = True
		216	TabOrder = 4
		217	end
		218	object DBLookupComboBox2: TDBLookupComboBox
		219	Left = 15
		220	Top = 120
		221	Width = 186
		222	Height = 21
		223	DataField = 'modul'
		224	DataSource = dsBugs
		225	KeyField = 'id'
		226	ListField = 'modul'
		227	ListSource = dsModule
		228	NullValueKey = 46
		229	TabOrder = 3
		230	end
		231	object DBLookupComboBox3: TDBLookupComboBox
		232	Left = 240
		233	Top = 168
		234	Width = 155
		235	Height = 21
		236	DataField = 'version_release'
		237	DataSource = dsBugs
		238	KeyField = 'id'
		239	ListField = 'version'
		240	ListSource = dsVersionen
		241	TabOrder = 6
		242	end
		243	object TrackBar1: TTrackBar
		244	Left = 245
		245	Top = 8
		246	Width = 164
		247	Height = 45
		248	Position = 5
		249	TabOrder = 10
		250	OnChange = TrackBar1Change
		251	end
		252	object btnFixedToggle: TButton
		253	Left = 401
		254	Top = 118
		255	Width = 72
		256	Height = 25
		257	Caption = 'Umschalten'
		258	TabOrder = 8
		259	OnClick = btnFixedToggleClick
		260	end
		261	object btnBearbeitungsnotiz: TButton
		262	Left = 16
		263	Top = 208
		264	Width = 185
		265	Height = 25
		266	Caption = 'Bearbeitungsnotiz hinzuf'#252'gen'
		267	TabOrder = 7
		268	end
		269	end
		270	object ADOConnection1: TADOConnection
		271	Connected = True
		272	ConnectionString =
		273	'Provider=MSDASQL.1;Persist Security Info=False;Data Source=MySQL' +
		274	' RAS;Initial Catalog=bugtracker'
		275	LoginPrompt = False
		276	Left = 104
		277	Top = 344
		278	end
		279	object dsBugs: TDataSource
		280	DataSet = qryBugs
		281	Left = 168
		282	Top = 312
		283	end
		284	object tblMitarbeiter: TADOTable
		285	Active = True
		286	Connection = ADOConnection1
		287	CursorType = ctStatic
		288	TableName = 'mitarbeiter'
		289	Left = 208
		290	Top = 344
		291	end
		292	object dsMitarbeiter: TDataSource
		293	DataSet = tblMitarbeiter
		294	Left = 208
		295	Top = 312
		296	end
		297	object MainMenu1: TMainMenu
		298	Left = 88
		299	Top = 216
		300	object Stammdaten1: TMenuItem
		301	Caption = 'Stammdaten'
		302	object Mitarbeiter1: TMenuItem
		303	Caption = 'Mitarbeiter'
		304	OnClick = Mitarbeiter1Click
		305	end
		306	object Projekte1: TMenuItem
		307	Caption = 'Projekte'
		308	OnClick = Projekte1Click
		309	end
		310	object Module1: TMenuItem
		311	Caption = 'Module'
		312	OnClick = Module1Click
		313	end
		314	object Versionen1: TMenuItem
		315	Caption = 'Versionen'
		316	OnClick = Versionen1Click
		317	end
		318	end
		319	object Projektwechseln1: TMenuItem
		320	Caption = 'Projekt wechseln'
		321	OnClick = Projektwechseln1Click
		322	end
		323	object Hilfe1: TMenuItem
		324	Caption = 'Hilfe'
		325	object ber1: TMenuItem
		326	Caption = #220'ber'
		327	OnClick = ber1Click
		328	end
		329	end
		330	end
		331	object XPManifest1: TXPManifest
		332	Left = 48
		333	Top = 216
		334	end
		335	object qryBugs: TADOQuery
		336	Active = True
		337	Connection = ADOConnection1
		338	CursorType = ctStatic
		339	AfterInsert = qryBugsAfterInsert
		340	AfterScroll = qryBugsAfterScroll
		341	Parameters = <>
		342	SQL.Strings = (
		343	'SELECT * FROM bugs order by wichtigkeit')
		344	Left = 168
		345	Top = 344
		346	object qryBugsid: TAutoIncField
		347	FieldName = 'id'
		348	ReadOnly = True
		349	end
		350	object qryBugstitel: TStringField
		351	FieldName = 'titel'
		352	Size = 255
		353	end
		354	object qryBugsbeschreibung: TMemoField
		355	FieldName = 'beschreibung'
		356	BlobType = ftMemo
		357	end
		358	object qryBugserstellt: TDateTimeField
		359	FieldName = 'erstellt'
		360	end
		361	object qryBugswichtigkeit: TIntegerField
		362	FieldName = 'wichtigkeit'
		363	end
		364	object qryBugsbearbeiter: TIntegerField
		365	FieldName = 'bearbeiter'
		366	end
		367	object qryBugsfixdatum: TDateTimeField
		368	FieldName = 'fixdatum'
		369	end
		370	object qryBugsversion_release: TIntegerField
		371	FieldName = 'version_release'
		372	OnValidate = qryBugsversion_releaseValidate
		373	end
		374	object qryBugsmodul: TIntegerField
		375	FieldName = 'modul'
		376	end
		377	object qryBugsprojekt: TIntegerField
		378	FieldName = 'projekt'
		379	end
		380	end
		381	object dsVersionen: TDataSource
		382	DataSet = qryVersionen
		383	Left = 240
		384	Top = 312
		385	end
		386	object tblProjekte: TADOTable
		387	Active = True
		388	Connection = ADOConnection1
		389	CursorType = ctStatic
		390	TableName = 'projekte'
		391	Left = 272
		392	Top = 344
		393	end
		394	object dsProjekte: TDataSource
		395	DataSet = tblProjekte
		396	Left = 272
		397	Top = 312
		398	end
		399	object dsModule: TDataSource
		400	DataSet = qryModule
		401	Left = 304
		402	Top = 312
		403	end
		404	object Timer1: TTimer
		405	OnTimer = Timer1Timer
		406	Left = 128
		407	Top = 216
		408	end
		409	object qryVersionen: TADOQuery
		410	Active = True
		411	Connection = ADOConnection1
		412	CursorType = ctStatic
		413	AfterInsert = qryVersionenAfterInsert
		414	Parameters = <>
		415	SQL.Strings = (
		416	'SELECT * FROM versionen')
		417	Left = 240
		418	Top = 344
		419	end
		420	object qryModule: TADOQuery
		421	Active = True
		422	Connection = ADOConnection1
		423	CursorType = ctStatic
		424	AfterInsert = qryModuleAfterInsert
		425	Parameters = <>
		426	SQL.Strings = (
		427	'SELECT * FROM module')
		428	Left = 304
		429	Top = 344
		430	end
		431	end

Subversion Repositories winbugtracker

winbugtracker/trunk/BugtrackerMain.dfm – Rev 4