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

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

Subversion Repositories winbugtracker

winbugtracker/trunk/BugtrackerMain.dfm – Rev 12