object FSJoueurs: TFSJoueurs Left = 195 Top = 197 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Nouvelle partie' ClientHeight = 293 ClientWidth = 504 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label2: TLabel Left = 8 Top = 264 Width = 255 Height = 13 Caption = 'NB: si 1 joueur ne joue pas, alors on ne prends pas en' end object Label3: TLabel Left = 32 Top = 280 Width = 233 Height = 13 Caption = 'compte les joueurs suivants' end object Button1: TButton Left = 304 Top = 264 Width = 75 Height = 25 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 392 Top = 264 Width = 75 Height = 25 Cancel = True Caption = '&Annuler' ModalResult = 2 TabOrder = 1 OnClick = Button2Click end object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 241 Height = 121 Caption = ' Joueur 1' TabOrder = 2 object Label1: TLabel Left = 8 Top = 72 Width = 25 Height = 13 Caption = 'Nom:' end object Type1: TRadioGroup Left = 8 Top = 16 Width = 105 Height = 49 Caption = ' Type' ItemIndex = 0 Items.Strings = ( '&Humain' '&Ordinateur') TabOrder = 0 OnClick = Type1Click end object Nom1: TEdit Left = 8 Top = 88 Width = 185 Height = 21 MaxLength = 25 TabOrder = 1 Text = 'Joueur1' end object Niveau1: TRadioGroup Left = 128 Top = 16 Width = 97 Height = 65 Caption = ' Niveau ' ItemIndex = 2 Items.Strings = ( 'Mauvais' 'Bon' 'Excellent') TabOrder = 2 end object UD1: TUpDown Left = 225 Top = 88 Width = 15 Height = 21 Associate = C1 Enabled = False Min = 0 Max = 999 Position = 0 TabOrder = 3 Wrap = False end object C1: TEdit Left = 200 Top = 88 Width = 25 Height = 21 Enabled = False TabOrder = 4 Text = '0' end end object GroupBox2: TGroupBox Left = 8 Top = 136 Width = 241 Height = 121 Caption = 'Joueur 2' TabOrder = 3 object Type2: TRadioGroup Left = 8 Top = 16 Width = 105 Height = 65 Caption = ' Type' ItemIndex = 1 Items.Strings = ( '&Humain' '&Ordinateur' '&Ne joue pas') TabOrder = 0 OnClick = Type2Click end object Nom2: TEdit Left = 8 Top = 88 Width = 185 Height = 21 Enabled = False MaxLength = 25 TabOrder = 1 end object Niveau2: TRadioGroup Left = 128 Top = 16 Width = 97 Height = 65 Caption = ' Niveau ' ItemIndex = 2 Items.Strings = ( 'Mauvais' 'Bon' 'Excellent') TabOrder = 2 end object C2: TEdit Left = 200 Top = 88 Width = 25 Height = 21 Enabled = False TabOrder = 3 Text = '0' end object UD2: TUpDown Left = 225 Top = 88 Width = 15 Height = 21 Associate = C2 Enabled = False Min = 0 Max = 999 Position = 0 TabOrder = 4 Wrap = False end end object GroupBox3: TGroupBox Left = 256 Top = 8 Width = 241 Height = 121 Caption = 'Joueur 3' TabOrder = 4 object Type3: TRadioGroup Left = 16 Top = 16 Width = 97 Height = 65 Caption = ' Type' ItemIndex = 2 Items.Strings = ( '&Humain' '&Ordinateur' '&Ne joue pas') TabOrder = 0 OnClick = Type3Click end object Nom3: TEdit Left = 8 Top = 88 Width = 185 Height = 21 Enabled = False MaxLength = 25 TabOrder = 1 end object Niveau3: TRadioGroup Left = 128 Top = 16 Width = 97 Height = 65 Caption = ' Niveau ' ItemIndex = 2 Items.Strings = ( 'Mauvais' 'Bon' 'Excellent') TabOrder = 2 end object C3: TEdit Left = 200 Top = 88 Width = 25 Height = 21 Enabled = False TabOrder = 3 Text = '0' end object UD3: TUpDown Left = 225 Top = 88 Width = 15 Height = 21 Associate = C3 Enabled = False Min = 0 Max = 999 Position = 0 TabOrder = 4 Wrap = False end end object GroupBox4: TGroupBox Left = 256 Top = 136 Width = 241 Height = 121 Caption = 'Joueur 4' TabOrder = 5 object Type4: TRadioGroup Left = 16 Top = 16 Width = 97 Height = 65 Caption = ' Type' ItemIndex = 2 Items.Strings = ( '&Humain' '&Ordinateur' '&Ne joue pas') TabOrder = 0 OnClick = Type4Click end object Nom4: TEdit Left = 8 Top = 88 Width = 185 Height = 21 Enabled = False MaxLength = 25 TabOrder = 1 end object Niveau4: TRadioGroup Left = 128 Top = 16 Width = 97 Height = 65 Caption = ' Niveau ' ItemIndex = 2 Items.Strings = ( 'Mauvais' 'Bon' 'Excellent') TabOrder = 2 end object C4: TEdit Left = 200 Top = 88 Width = 25 Height = 21 Enabled = False TabOrder = 3 Text = '0' end object UD4: TUpDown Left = 225 Top = 88 Width = 15 Height = 21 Associate = C4 Enabled = False Min = 0 Max = 999 Position = 0 TabOrder = 4 Wrap = False end end end