ZSL-Mirror/run_n_inf7
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Subtrees hinzugefügt

Browse source
This commit is contained in:
Thomas Schaller 2025-01-02 12:26:47 +01:00
parent 433a6f2eb1
commit a02bf698e6
19 changed files with 2775 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

303
Quellcodes/sonst_spiel_grosserpreis/FrageGUI.jfm Normal file
View file

@ -0,0 +1,303 @@
object frageGUI: TFGUIForm
Left = 160
Top = 45
BorderIcons = [biSystemMenu]
Caption = 'FrageGUI'
ClientHeight = 408
ClientWidth = 641
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -10
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = True
Position = poDesigned
ShowHint = True
Visible = True
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnResize = FormResize
FrameType = 5
Resizable = False
Undecorated = True
Background = clBtnFace
PixelsPerInch = 96
TextHeight = 13
object jPanel1: TJPanel
Tag = 12
Left = 0
Top = 0
Width = 641
Height = 409
Hint = 'jPanel1'
Foreground = 3355443
Background = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Dialog'
Font.Style = [fsBold]
Border.BorderType = LineBorder
Border.LineColor = clBlack
Border.LineThickness = 2
Border.LineRounded = False
Border.EtchHighlightColor = clBlack
Border.EtchShadowColor = clBlack
Border.Etchtype = 0
Border.BevelHighlightColor = clBlack
Border.BevelShadowColor = clBlack
Border.Beveltype = 0
Border.MatteColor = clBlack
Border.MatteTop = 0
Border.MatteLeft = 0
Border.MatteBottom = 0
Border.MatteRight = 0
end
object jB_A1: TJButton
Tag = 4
Left = 8
Top = 96
Width = 329
Height = 121
Hint = 'jButton1'
Foreground = clWindowText
Background = 15060920
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Dialog'
Font.Style = [fsBold]
actionPerformed = 'jB_A1_ActionPerformed'
Text = 'jButtonA1'
Mnemonic = 0
DisplayedMnemonicIndex = 0
Selected = False
BorderPainted = True
FocusPainted = False
ContentAreaFilled = True
HorizontalAlignment = CENTER
VerticalAlignment = CENTER
HorizontalTextPosition = CENTER
VerticalTextPosition = CENTER
IconTextGap = 4
RolloverEnabled = False
Border.BorderType = NoBorder
Border.LineColor = clBlack
Border.LineThickness = 0
Border.LineRounded = False
Border.EtchHighlightColor = clBlack
Border.EtchShadowColor = clBlack
Border.Etchtype = 0
Border.BevelHighlightColor = clBlack
Border.BevelShadowColor = clBlack
Border.Beveltype = 0
Border.MatteColor = clBlack
Border.MatteTop = 0
Border.MatteLeft = 0
Border.MatteBottom = 0
Border.MatteRight = 0
end
object jB_A2: TJButton
Tag = 4
Left = 352
Top = 96
Width = 281
Height = 121
Hint = 'jButton2'
Foreground = clWindowText
Background = 15060920
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Dialog'
Font.Style = [fsBold]
actionPerformed = 'jB_A2_ActionPerformed'
Text = 'jButton2'
Mnemonic = 0
DisplayedMnemonicIndex = 0
Selected = False
BorderPainted = True
FocusPainted = False
ContentAreaFilled = True
HorizontalAlignment = CENTER
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = CENTER
IconTextGap = 4
RolloverEnabled = False
Border.BorderType = NoBorder
Border.LineColor = clBlack
Border.LineThickness = 0
Border.LineRounded = False
Border.EtchHighlightColor = clBlack
Border.EtchShadowColor = clBlack
Border.Etchtype = 0
Border.BevelHighlightColor = clBlack
Border.BevelShadowColor = clBlack
Border.Beveltype = 0
Border.MatteColor = clBlack
Border.MatteTop = 0
Border.MatteLeft = 0
Border.MatteBottom = 0
Border.MatteRight = 0
end
object jB_A3: TJButton
Tag = 4
Left = 8
Top = 224
Width = 329
Height = 137
Hint = 'jButton3'
Foreground = clWindowText
Background = 15060920
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Dialog'
Font.Style = [fsBold]
actionPerformed = 'jB_A3_ActionPerformed'
Text = 'jButton3'
Mnemonic = 0
DisplayedMnemonicIndex = 0
Selected = False
BorderPainted = True
FocusPainted = False
ContentAreaFilled = True
HorizontalAlignment = CENTER
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = CENTER
IconTextGap = 4
RolloverEnabled = False
Border.BorderType = NoBorder
Border.LineColor = clBlack
Border.LineThickness = 0
Border.LineRounded = False
Border.EtchHighlightColor = clBlack
Border.EtchShadowColor = clBlack
Border.Etchtype = 0
Border.BevelHighlightColor = clBlack
Border.BevelShadowColor = clBlack
Border.Beveltype = 0
Border.MatteColor = clBlack
Border.MatteTop = 0
Border.MatteLeft = 0
Border.MatteBottom = 0
Border.MatteRight = 0
end
object jB_A4: TJButton
Tag = 4
Left = 352
Top = 224
Width = 281
Height = 137
Hint = 'jButton4'
Foreground = clWindowText
Background = 15060920
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Dialog'
Font.Style = [fsBold]
actionPerformed = 'jB_A4_ActionPerformed'
Text = 'jButton4'
Mnemonic = 0
DisplayedMnemonicIndex = 0
Selected = False
BorderPainted = True
FocusPainted = False
ContentAreaFilled = True
HorizontalAlignment = CENTER
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = CENTER
IconTextGap = 4
RolloverEnabled = False
Border.BorderType = NoBorder
Border.LineColor = clBlack
Border.LineThickness = 0
Border.LineRounded = False
Border.EtchHighlightColor = clBlack
Border.EtchShadowColor = clBlack
Border.Etchtype = 0
Border.BevelHighlightColor = clBlack
Border.BevelShadowColor = clBlack
Border.Beveltype = 0
Border.MatteColor = clBlack
Border.MatteTop = 0
Border.MatteLeft = 0
Border.MatteBottom = 0
Border.MatteRight = 0
end
object jLName: TJLabel
Tag = 1
Left = 8
Top = 360
Width = 624
Height = 45
Hint = 'jLabel2'
Foreground = clWindowText
Background = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Dialog'
Font.Style = [fsBold]
Text = 'Spieler 1 entscheide dich!'
HorizontalAlignment = LEFT
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = CENTER
IconTextGap = 4
DisplayedMnemonic = 0
DisplayedMnemonicIndex = 0
end
object jLFrage: TJLabel
Tag = 1
Left = 96
Top = 0
Width = 534
Height = 97
Hint = 'jLabel2'
Foreground = clWindowText
Background = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Dialog'
Font.Style = [fsBold]
Text = 'text'
HorizontalAlignment = LEFT
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = TOP
IconTextGap = 4
DisplayedMnemonic = 0
DisplayedMnemonicIndex = 0
end
object jLabel1: TJLabel
Tag = 1
Left = 8
Top = 8
Width = 78
Height = 81
Hint = 'jLabel1'
Foreground = clWindowText
Background = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Dialog'
Font.Style = [fsBold]
Text = '<html><p valign=top>Frage: </p></html>'
HorizontalAlignment = LEFT
VerticalAlignment = CENTER
HorizontalTextPosition = RIGHT
VerticalTextPosition = TOP
IconTextGap = 4
DisplayedMnemonic = 0
DisplayedMnemonicIndex = 0
end
end