[Erreur] sur une iteration : for do

g0belin Messages postés 155 Date d'inscription jeudi 6 décembre 2001 Statut Membre Dernière intervention 19 avril 2010 - 24 janv. 2002 à 16:57
DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009 - 25 janv. 2002 à 11:17

procedure TForm1.Button1Click(Sender: TObject);
var
result:string;
reste,nbr:integer;
begin
nbr:=StrToInt(edit1.text);
for nbr = 0 do
begin
reste:=nbr mod 2;
result:=result+IntToStr(reste);
if reste = 1
then
nbr:=(nbr-1)div 2
else
nbr:=nbr div 2;
end;
edit2.text:=result;
end;

end.
===============================
ERREUR:
----------
=[Erreur] Unit1.pas(33): La variable de contrôle de boucle FOR doit être une variable locale simple
=[Erreur] Unit1.pas(34): Expression attendu(e) mais 'BEGIN' trouvé(e)
=[Erreur fatale] Project1.dpr(5): Ne peut compiler l'unité utilisée 'Unit1.pas'

A voir également:

[Erreur] sur une iteration : for do
Erreur d'exécution 424 ✓ - Forum Visual Basic
Erreur 424 "Objet requis" ✓ - Forum Visual Basic 6
Message d'erreur 424: objet requis ✓ - Forum VBA Office (Excel, Word ...)
Erreur d'execution 9 ✓ - Forum Visual Basic 6
Code erreur w31 - Forum VB.NET

2 réponses

Réponse 1 / 2

g0belin Messages postés 155 Date d'inscription jeudi 6 décembre 2001 Statut Membre Dernière intervention 19 avril 2010
24 janv. 2002 à 19:52

C'est pas grave j'ai reussi a faire autrment...

Réponse 2 / 2

DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009
25 janv. 2002 à 11:17

la syntax d'un For cé

For i = 1 To 5 Do
begin

end;

Toi tu lui dit de commencé à 0 mais il ne sais pas ou il doit s'arreter ta oublié le To ...

DelphiCool
www.progzed.com
progzed.com/forum

.

Discussions similaires

Erreur d’exécution 424 : objet requis

erreur d'execution 9

erreur d'execution '9'

Erreur d'exécution '9' : l'indice n'appartient pas à la sélection

Erreur d'exécution 9

Votre réponse

Discussions similaires