Rev 5 | Blame | Compare with Previous | Last modification | View Log | RSS feed
object HighScoreForm: THighScoreForm
Left = 258
Top = 131
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Highscores'
ClientHeight = 305
ClientWidth = 441
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
PixelsPerInch = 96
TextHeight = 13
object PageControl: TPageControl
Left = 8
Top = 8
Width = 425
Height = 249
ActivePage = PPMTab
TabOrder = 1
object PPMTab: TTabSheet
Caption = 'H'#246'chste Punkte pro Minute'
ImageIndex = 3
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object PPMList: TListView
Left = 8
Top = 8
Width = 401
Height = 201
Columns = <
item
Caption = 'Name'
Width = 123
end
item
Caption = 'Datum'
Width = 123
end
item
Caption = 'Punkte pro Minute'
Width = 123
end>
ColumnClick = False
ReadOnly = True
RowSelect = True
TabOrder = 0
TabStop = False
ViewStyle = vsReport
OnCompare = CompareAsc
end
end
object RemainingTab: TTabSheet
Caption = 'Geringste verbleibende Steine'
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object RemainingList: TListView
Left = 8
Top = 8
Width = 401
Height = 201
Columns = <
item
Caption = 'Name'
Width = 123
end
item
Caption = 'Datum'
Width = 123
end
item
Caption = 'Verbleibende Steine'
Width = 123
end>
ColumnClick = False
ReadOnly = True
RowSelect = True
TabOrder = 0
TabStop = False
ViewStyle = vsReport
OnCompare = CompareDesc
end
end
object TimeTab: TTabSheet
Caption = 'K'#252'rzeste Zeit'
ImageIndex = 1
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object TimeList: TListView
Left = 8
Top = 8
Width = 401
Height = 201
Columns = <
item
Caption = 'Name'
Width = 123
end
item
Caption = 'Datum'
Width = 123
end
item
Caption = 'Zeit in Sekunden'
Width = 123
end>
ColumnClick = False
ReadOnly = True
RowSelect = True
TabOrder = 0
TabStop = False
ViewStyle = vsReport
OnCompare = CompareDesc
end
end
object ScoreTab: TTabSheet
Caption = 'H'#246'chste Punktezahl'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object ScoreList: TListView
Left = 8
Top = 8
Width = 401
Height = 201
Columns = <
item
Caption = 'Name'
Width = 123
end
item
Caption = 'Datum'
Width = 123
end
item
Caption = 'Punkte'
Width = 123
end>
ColumnClick = False
ReadOnly = True
RowSelect = True
TabOrder = 0
TabStop = False
ViewStyle = vsReport
OnCompare = CompareAsc
end
end
end
object CloseBtn: TButton
Left = 312
Top = 272
Width = 123
Height = 25
Cancel = True
Caption = 'Schlie'#223'en'
Default = True
TabOrder = 0
OnClick = CloseBtnClick
end
object ClearBtn: TButton
Left = 8
Top = 272
Width = 75
Height = 25
Caption = 'Liste leeren'
TabOrder = 2
OnClick = ClearBtnClick
end
end