Discussion :

[tintine]

Bonjour,
j'ai une question, je voudrais traduire ce bout de code de Delphi en c#:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
i,nboucles : integer;
paquet : string;
if nboucles<=1278 then
begin
     paquet:='';
     for i:=1 to 100 do
         paquet := paquet + chaine[i+100*nboucles];
     nboucles:=nboucles+1;
     progressbar3.stepit;
     statusbar1.SimpleText:=formatfloat('##0',nboucles/1278*100)+'% Transférés';
     comport2.writestr(paquet);
end

pouvez vous m'aider à comprendre ce bout de code ?

[guillemouze]

a priori, tu as une chaine "chaine" de 127900 caracteres, et selon la valeur de nboucles, on va envoyer un paquet de 100 caracteres sur le port com.
Si tu as une boucle autour sur nboucles, je dirai que tu envoie "chaine" par paquet de 100 caracters sur le port com.
avec une légère simplification du code :

Code :

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

1
2
3
4
5
6
7
8
9
 
if nboucles <= 1278 then
begin
     paquet:=copy(Chaine, 100*nboucles+1, 100);
     Inc(nboucles);
     progressbar3.stepit;
     statusbar1.SimpleText:=formatfloat('##0',nboucles/1278*100)+'% Transférés';
     comport2.writestr(paquet);
end

[tintine]

merci pour le retour;

voila j'ai essayé de le traduire en c#

Code c# :

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
 
public string str;
public int i=0;
public string don;
 private void serialPort1_DataReceived(object sender, SerialDataReceivedEventArgs e)
        {
System.Threading.Thread.Sleep(100);
           if (str.Length > 0)
             {
                 if (i < str.Length - (str.Length % 50))
                 {
                     don = str.Substring(i, 100);
                     serialPort1.Write(don);
                     i += 50;
                     toolStripStatusLabel1.Text = "Transfert...";
 
                 }
else {toolStripStatusLabel1.Text = "Terminé";}
}
}

est-il en cohérence ?

[guillemouze]

Alors il me manque la fonction qui englobe ton code du 1er message, mais je trouve etonnant que, a la reception de quelconques données sur le port, tu renvoie ta chaine sur le meme port !
Sinon, est-ce que (str.Length % 50) est un modulo ? dans ce cas tu ne va pas envoyer le dernier paquet si il fait moins de 50 caracteres.
ca serait plutot :

Code c# :

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

1
2
3
4
5
6
7
 
nbAEnvoyer = (str.Length - i) % 100;
if (nbAEnvoyer > 0)
                 {
                     don = str.Substring(i, nbAEnvoyer);
                     serialPort1.Write(don);
                     i += 100;

Etonnant, tu avance de 50 caracteres à chaque itération, mais tu en envoie 100 ... tu risque d'envoyer ABBCCDDE(+50char de n'importe quoi) au lieu d'envoyer ABCDE