Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  dans le code :
 
type
tdirection=record
    offsetLigne:integer;
    offsetColonne:integer;
  end;
 
const 
  nord:tdirection=(offsetLigne:-1;offsetColonne:0);
  sud:tdirection=(offsetLigne:1;offsetColonne:0);
  ouest:tdirection=(offsetLigne:0;offsetColonne:-1);
  est:tdirection=(offsetLigne:0;offsetColonne:1);
  nord_ouset:tdirection=(offsetLigne:-1;offsetColonne:-1);
  nord_est:tdirection=(offsetLigne:-1;offsetColonne:1);
  sud_ouest:tdirection=(offsetLigne:1;offsetColonne:-1);
  sud_est:tdirection=(offsetLigne:1;offsetColonne:1);
  dir_hrz:array[0..3]of tdirection=(nord,sud,ouest,est);//ligne 90
  dir_diag:array[0..3]of tdirection=(nord_ouest, nord_est,sud_ouest,sud_est);
  dir_tot:array[0..7]of tdirection=(nord,sud,ouest,est,nord_ouest, nord_est,sud_ouest,sud_est);
 
il me dit : [dcc32 Erreur] Unit2.pas(90): E2029 '(' attendu(e) mais identificateur 'nord' trouvé(e) à la ligne 90, une idée ?