winbugtrackeralarmingautosfxaysaliacalllibchecksum-toolscolormanagercryptochatcurrency_converterdecoderdelphiutilsdistributeddpcstudiodpg2fastphpfileformatsfilter_foundryforestgridgameht46f47_simulatorindexer_suiteipe_artfile_utilsjavautilsjumperlightgamelogviewermusikboxmystic_houseoidconverteroidinfo_apioidinfo_new_designoidpluspersonal-webbasephp_antispamphp_clientchallengephp_guestbookphp_utilsplumbersprependrecyclebinunitsimple_log_eventsokobanspacemissionstackmanuserdetect2uuid_mac_utilsvgwhoisvnagwebcounteryt_downloader

BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → /trunk/WuLiMain.dfm @ 2

  → /trunk/WuLiMain.dfm @ 3

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Regard whitespace Rev 2 → Rev 3

/trunk/WuLiMain.dfm
1,9 → 1,9
object Form1: TForm1
object frmBugtracker: TfrmBugtracker
Left = 0
Top = 0
Caption = 'ViaThinkSoft Bugtracker f'#252'r Windows'
ClientHeight = 440
ClientWidth = 691
ClientHeight = 498
ClientWidth = 751
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
13,10 → 13,108
Menu = MainMenu1
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 249
Top = 0
Height = 498
ExplicitLeft = 0
ExplicitTop = 136
ExplicitHeight = 100
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 249
Height = 498
Align = alLeft
TabOrder = 0
ExplicitLeft = 256
ExplicitTop = 448
DesignSize = (
249
498)
object DBGrid1: TDBGrid
Left = 8
Top = 35
Width = 233
Height = 406
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = dsBugs
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'id'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'titel'
Width = 111
Visible = True
end
item
Expanded = False
FieldName = 'wichtigkeit'
Width = 36
Visible = True
end>
end
object ComboBox1: TComboBox
Left = 8
Top = 8
Width = 233
Height = 21
Style = csDropDownList
Anchors = [akLeft, akTop, akRight]
ItemHeight = 13
ItemIndex = 0
TabOrder = 1
Text = 'Meine offenen Bugs (nach Wichtigkeit)'
OnChange = ComboBox1Change
Items.Strings = (
'Meine offenen Bugs (nach Wichtigkeit)'
'Alle offenen Bugs (nach Wichtigkeit)'
'Gel'#246'st ohne Ver'#246'ffentlichung (nach L'#246'sungsdatum)'
'Gel'#246'st und Ver'#246'ffentlicht (nach Version und L'#246'sungsdatum)'
'Alle Bugs (nach Er'#246'ffnungsdatum)')
end
object DBNavigator2: TDBNavigator
Left = 11
Top = 456
Width = 232
Height = 25
DataSource = dsBugs
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
Anchors = [akLeft, akRight, akBottom]
TabOrder = 2
end
end
object Panel2: TPanel
Left = 252
Top = 0
Width = 499
Height = 498
Align = alClient
TabOrder = 1
ExplicitLeft = 320
ExplicitTop = 8
ExplicitWidth = 441
DesignSize = (
499
498)
object Label1: TLabel
Left = 247
Left = 15
Top = 53
Width = 50
Height = 13
23,7 → 121,7
Caption = 'Bearbeiter'
end
object Label2: TLabel
Left = 247
Left = 15
Top = 149
Width = 20
Height = 13
30,7 → 128,7
Caption = 'Titel'
end
object Label3: TLabel
Left = 472
Left = 240
Top = 53
Width = 33
Height = 13
37,7 → 135,7
Caption = 'Erstellt'
end
object Label4: TLabel
Left = 472
Left = 240
Top = 101
Width = 29
Height = 13
44,7 → 142,7
Caption = 'Gefixt'
end
object Label5: TLabel
Left = 247
Left = 15
Top = 101
Width = 28
Height = 13
51,7 → 149,7
Caption = 'Modul'
end
object Label6: TLabel
Left = 472
Left = 240
Top = 149
Width = 119
Height = 13
58,7 → 156,7
Caption = 'Ver'#246'ffentlicht als Version'
end
object DBNavigator1: TDBNavigator
Left = 247
Left = 15
Top = 16
Width = 224
Height = 25
67,57 → 165,26
TabOrder = 0
end
object DBRichEdit1: TDBRichEdit
Left = 247
Top = 208
Width = 402
Height = 209
Left = 15
Top = 248
Width = 471
Height = 233
Anchors = [akLeft, akTop, akRight, akBottom]
DataField = 'beschreibung'
DataSource = dsBugs
TabOrder = 1
TabOrder = 9
end
object DBGrid1: TDBGrid
Left = 8
Top = 47
Width = 233
Height = 370
DataSource = dsBugs
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'id'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'titel'
Width = 111
Visible = True
end
item
Expanded = False
FieldName = 'wichtigkeit'
Width = 36
Visible = True
end>
end
object DBEdit1: TDBEdit
Left = 247
Left = 15
Top = 168
Width = 186
Height = 21
DataField = 'titel'
DataSource = dsBugs
TabOrder = 3
TabOrder = 5
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 247
Left = 15
Top = 72
Width = 186
Height = 21
126,32 → 193,35
KeyField = 'id'
ListField = 'name'
ListSource = dsMitarbeiter
TabOrder = 4
NullValueKey = 46
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 472
Left = 240
Top = 72
Width = 121
Width = 155
Height = 21
TabStop = False
Color = clBtnFace
DataField = 'erstellt'
DataSource = dsBugs
ReadOnly = True
TabOrder = 5
TabOrder = 2
end
object DBEdit3: TDBEdit
Left = 472
Left = 240
Top = 120
Width = 121
Width = 155
Height = 21
TabStop = False
Color = clBtnFace
DataField = 'fixdatum'
DataSource = dsBugs
ReadOnly = True
TabOrder = 6
TabOrder = 4
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 247
Left = 15
Top = 120
Width = 186
Height = 21
160,12 → 230,13
KeyField = 'id'
ListField = 'modul'
ListSource = dsModule
TabOrder = 7
NullValueKey = 46
TabOrder = 3
end
object DBLookupComboBox3: TDBLookupComboBox
Left = 472
Left = 240
Top = 168
Width = 121
Width = 155
Height = 21
DataField = 'version_release'
DataSource = dsBugs
172,33 → 243,35
KeyField = 'id'
ListField = 'version'
ListSource = dsVersionen
TabOrder = 8
TabOrder = 6
end
object TrackBar1: TTrackBar
Left = 477
Left = 245
Top = 8
Width = 150
Width = 164
Height = 45
Position = 5
TabOrder = 9
TabOrder = 10
OnChange = TrackBar1Change
end
object ComboBox1: TComboBox
Left = 8
Top = 8
Width = 233
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 10
Text = 'Meine offene Bugs (nach Wichtigkeit)'
Items.Strings = (
'Meine offene Bugs (nach Wichtigkeit)'
'Alle ofene Bugs (nach Wichtigkeit)'
'Gel'#246'st ohne Ver'#246'ffentlichung (nach L'#246'sungsdatum)'
'Gel'#246'st und Ver'#246'ffentlicht (nach Version und L'#246'sungsdatum)')
object btnFixedToggle: TButton
Left = 401
Top = 118
Width = 72
Height = 25
Caption = 'Umschalten'
TabOrder = 8
OnClick = btnFixedToggleClick
end
object btnBearbeitungsnotiz: TButton
Left = 16
Top = 208
Width = 185
Height = 25
Caption = 'Bearbeitungsnotiz hinzuf'#252'gen'
TabOrder = 7
end
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
205,12 → 278,12
'Provider=MSDASQL.1;Persist Security Info=False;Data Source=MySQL' +
' RAS;Initial Catalog=bugtracker'
LoginPrompt = False
Left = 336
Left = 104
Top = 344
end
object dsBugs: TDataSource
DataSet = qryBugs
Left = 400
Left = 168
Top = 312
end
object tblMitarbeiter: TADOTable
218,17 → 291,17
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'mitarbeiter'
Left = 440
Left = 208
Top = 344
end
object dsMitarbeiter: TDataSource
DataSet = tblMitarbeiter
Left = 440
Left = 208
Top = 312
end
object MainMenu1: TMainMenu
Left = 640
Top = 48
Left = 88
Top = 216
object Stammdaten1: TMenuItem
Caption = 'Stammdaten'
object Mitarbeiter1: TMenuItem
248,33 → 321,79
OnClick = Versionen1Click
end
end
object Projektwechseln1: TMenuItem
Caption = 'Projekt wechseln'
OnClick = Projektwechseln1Click
end
object Hilfe1: TMenuItem
Caption = 'Hilfe'
object ber1: TMenuItem
Caption = #220'ber'
OnClick = ber1Click
end
end
end
object XPManifest1: TXPManifest
Left = 640
Top = 8
Left = 48
Top = 216
end
object qryBugs: TADOQuery
Active = True
Connection = ADOConnection1
CursorType = ctStatic
AfterInsert = qryBugsAfterInsert
AfterScroll = qryBugsAfterScroll
Parameters = <>
SQL.Strings = (
'SELECT * FROM bugs order by wichtigkeit')
Left = 400
Left = 168
Top = 344
object qryBugsid: TAutoIncField
FieldName = 'id'
ReadOnly = True
end
object qryBugstitel: TStringField
FieldName = 'titel'
Size = 255
end
object qryBugsbeschreibung: TMemoField
FieldName = 'beschreibung'
BlobType = ftMemo
end
object qryBugserstellt: TDateTimeField
FieldName = 'erstellt'
end
object qryBugswichtigkeit: TIntegerField
FieldName = 'wichtigkeit'
end
object qryBugsbearbeiter: TIntegerField
FieldName = 'bearbeiter'
end
object qryBugsfixdatum: TDateTimeField
FieldName = 'fixdatum'
end
object qryBugsversion_release: TIntegerField
FieldName = 'version_release'
OnValidate = qryBugsversion_releaseValidate
end
object qryBugsmodul: TIntegerField
FieldName = 'modul'
end
object qryBugsprojekt: TIntegerField
FieldName = 'projekt'
end
end
object tblVersionen: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'versionen'
Left = 472
Left = 240
Top = 344
end
object dsVersionen: TDataSource
DataSet = tblVersionen
Left = 472
Left = 240
Top = 312
end
object tblProjekte: TADOTable
282,12 → 401,12
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'projekte'
Left = 504
Left = 272
Top = 344
end
object dsProjekte: TDataSource
DataSet = tblProjekte
Left = 504
Left = 272
Top = 312
end
object tblModule: TADOTable
295,12 → 414,17
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'module'
Left = 536
Left = 304
Top = 344
end
object dsModule: TDataSource
DataSet = tblModule
Left = 536
Left = 304
Top = 312
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 128
Top = 216
end
end