Files
SignauxComplexes/Unitplace.dfm
f1iwq2 f2cbfc2936 V8.8
V8.8
2024-05-03 20:01:01 +02:00

123 lines
2.7 KiB
Plaintext

object FormRoulage: TFormRoulage
Left = 368
Top = 142
BorderStyle = bsDialog
Caption = 'Roulage des trains'
ClientHeight = 275
ClientWidth = 307
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poMainFormCenter
OnActivate = FormActivate
OnCreate = FormCreate
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 96
Top = 8
Width = 116
Height = 20
Caption = 'Roulage des trains'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial Narrow'
Font.Style = [fsBold]
ParentFont = False
end
object LabelTexte: TLabel
Left = 17
Top = 32
Width = 120
Height = 13
Caption = '. '
end
object ButtonInitAig: TButton
Left = 16
Top = 56
Width = 273
Height = 25
Caption = 'Positionner les aiguillages en position initiale'
TabOrder = 0
OnClick = ButtonInitAigClick
end
object ButtonSauve: TButton
Left = 16
Top = 184
Width = 273
Height = 25
Hint =
'Enregistre la configuration de placement dans le fichier de conf' +
'iguration'
Caption = 'Enregistrer la configuration de placement'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = ButtonSauveClick
end
object ButtonLanceRoutage: TButton
Left = 16
Top = 88
Width = 273
Height = 25
Caption = 'Lancer le roulage'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInfoText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = ButtonLanceRoutageClick
end
object Button1: TButton
Left = 216
Top = 240
Width = 81
Height = 25
Caption = 'Config trains'
TabOrder = 3
OnClick = Button1Click
end
object ButtonArretroutage: TButton
Left = 16
Top = 152
Width = 273
Height = 25
Hint = 'Arr'#234't des trains et lib'#232're les r'#233'servations'
Caption = 'Arr'#234't du roulage'
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = ButtonArretroutageClick
end
object BitBtn1: TBitBtn
Left = 8
Top = 240
Width = 73
Height = 25
TabOrder = 5
OnClick = BitBtn1Click
Kind = bkClose
end
object ButtonArretTrains: TButton
Left = 16
Top = 120
Width = 273
Height = 25
Hint = 'Arr'#234'te tous les trains'
Caption = 'Arr'#234't des trains'
ParentShowHint = False
ShowHint = True
TabOrder = 6
OnClick = ButtonArretTrainsClick
end
end