Discussion :

[potili2]

bonjour
la question va paraître bête pour beaucoup, mettons ça sur mon grand âge(...)
je veux utiliser la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

function LeftStr(const AText: string; ACount: Integer): string;

mais je ne sais comment m'y prendre pour la déclarer
j'ai tapé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
function LeftStr(const AText: string; ACount: Integer): string;
begin
result := LeftStr( Atext, Acount);
end
-
-
-
mot := lefstr('parapuie',2);

et j'obtiens une boucle infinie.
merci pour vos réponses...indulgentes
Jean Pierre

[MiJack]

Et bien bien sûr : tu appelles ta fonction LeftStr dans la fonction LeftStr, donc c'est logique qu'il fasse une boucle infinie

Mais quel est ton but exactement ? Car la fonction LeftStr existe dans Delphi par défaut, pourquoi tu ne l'utilises pas directement ?

[potili2]

mais si je cherche à l'utiliser directement, on me dit qu'elle n'est pas définie...
j'avais tapé, auparavant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mot := lefstr('parapuie',2);

sans rien d'autre
on me met "identificateur non déclaré"
finalement faut il déclarer ou non une telle fonction, et si oui, comment?
merci

[Cl@udius]

Salut

La fonction LeftStr est définie dans l'unité StrUtils.
Il te suffit de l'ajouter à tes uses.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
  uses ..., StrUtils;

@+ Claudius

[sovitec]

mais si je cherche à l'utiliser directement, on me dit qu'elle n'est pas définie...
j'avais tapé, auparavant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mot := lefstr('parapuie',2);

sans rien d'autre
on me met "identificateur non déclaré"
finalement faut il déclarer ou non une telle fonction, et si oui, comment?
merci

Pas besoin de la déclarée, il suffit de rajouter StrUtils à ta clause uses.

De manière générale si le compilateur renvoie un message "identificateur non déclaré" il suffit de positionner le curseur sur le mot incriminé et d'appuyer sur la touche F2 (aide). L'aide de Delphi donne alors la bibliothèque à rajouter dans uses.

[potili2]

MERCI!
je n'avais pas compris qu'il fallait rajoute ceci.
je perds un temps fou avec ce genre de choses. Heuerusement que vous êtes là...
Jean Pierre

[defluc]

Accessoirement, avec

mot := lefstr('parapuie',2);

la fonction sera toujours considérée non déclarée car c'est leftstr et non lefstr qui est dans StrUtil.