Incompatible types : 'char' and 'string'
rayenneyassine
-
Utilisateur anonyme -
Utilisateur anonyme -
Program code;
Uses WinCrt;
Var
x:String;
z:Char;
r:Integer;
Begin
WriteLn('donner un mot'); Readln(x);
z:=Copy(x,((Length(x)) Div 2), 1);
r:= Ord(z);
WriteLn (r);
End.
j'ai essayée mais le programme ne fonctionne pas et affiche :
incompatible types : 'char' and 'string'
Uses WinCrt;
Var
x:String;
z:Char;
r:Integer;
Begin
WriteLn('donner un mot'); Readln(x);
z:=Copy(x,((Length(x)) Div 2), 1);
r:= Ord(z);
WriteLn (r);
End.
j'ai essayée mais le programme ne fonctionne pas et affiche :
incompatible types : 'char' and 'string'
A voir également:
- Type d'argument byref incompatible
- Clear type - Guide
- Type de ram - Guide
- Incompatibilité de type vba ✓ - Forum Programmation
- Click-n-type - Télécharger - Vie quotidienne
- Erreur d'exécution '13': Incompatibilité de Type ✓ - Forum VB / VBA
1 réponse
Bonjour
La fonction Copy donne une 'string'.
Toi tu essayes de mettre le résultat dans un char quand tu fais
Pour extraire un char unique d'une string x, il faut utiliser la notation x[1], x[2]...
La fonction Copy donne une 'string'.
Toi tu essayes de mettre le résultat dans un char quand tu fais
z:= Copy(...: ce n'est pas possible, les deux types sont incompatibles. Même si ta 'string' fait un seul caractère.
Pour extraire un char unique d'une string x, il faut utiliser la notation x[1], x[2]...
