fichser EST UN FICHIER composé de serie:string[8]
nrclub/string[6).
indeq/chat
indref/byte
hrmatch/string[4]
fichrens eqvisi:ARRAy[[1..5,1..3] of byte
eqteur:array[1..5,1..3 ] OF byte
da_aller:array[1..5,] of string[8]
da-retour: array[1..5] OF STRING[8]
RESET(fichser)
seek(fichser,1);
repeat
read(fichser,ser°
until (ser;serie=divi) and (ser.indref=gricaL(.eqteur[i,jJ])
bien qu'existante ser;indref et grical(eqteur(I,J) existent la condition n4est pas realisee ;
Pourquoi ce refus et comment y remédier par une astuce ou autre ou faut-il rechercher autre chose,
Mais aussi pour passer le texte en minuscule.
Des phrases entières en majuscule, ça fait un peu agressif, et en général, on n'aime pas aider les gens qui nous parlent de cette façon.
Salut
Pour commencer tu pourrais nous fournir le code qui vient vraiment de Delphi car ce que tu nous donne ne correspond pas à grand chose :
erreur de syntaxe,
variables inconnues, (divi)
functions inconnues (grical)
etc ...
un petit effort et on pourra peut être t'aider
Cordialement
