Bonjour,

J'essaye de traduire ce bout de programme imposer par mon professeur pour la réalisation d'un projet.
Je compte le faire en java car je n'ai pas fait de pascal.

Code : 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
21
22
23
24
 
Var
  fin, fout: FichierBit;
  k, taille: Integer;
  bit      : Byte;
 
Begin
  If ParamCount <> 2 Then 
    WriteLn('Ligne de Commande: BitCopy NomFichOrig NomFichDest')
  Else Begin
    AssocieNomFich(fin, ParamStr(1));
    AssocieNomFich(fout, ParamStr(2));
    InitFichLecture(fin);
    InitFichEcriture(fout);
    EcritChaine('************************ Début ************************'#13#13, fout);
    taille := FileSize(fin.fich);
    For k := 1 To 8 * taille Do Begin
      LireBit(fin, bit);
      EcrireBit(fout, bit);
    End;
    EcritChaine(#13#13'************************ Fin ************************', fout);
    ClotureEcriture(fout);
  End;
End.
Voila ce que j'ai déjà pu faire

Code : 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
21
22
23
24
25
26
27
 
 
public void EcrireChaine (String ch, FichierBit f)
	{
		for (int i=1; i == ch.length(); i++)
		{
			EcritCaractere(ch.charAt(i), f);
 
		}
 
 
	}
 
public static void main(String[] args) throws IOException {
 
		if(args.length != 2)
			System.out.println("Ligne de Commande: Java ByteCopy NomFichOrig NomFichDest");
		else {
			InputStream fin = new FileInputStream(args[0]);
			OutputStream fout = new FileOutputStream(args[1]);
 
			EcritChaine("************************ Début ************************", fout);
 
			fin.close();
			fout.close();
		}
	}
Pour la procedure InitFichLecture je sais qu'en pascal c'est Reset() et
pour InitFichEcriture c'est Rewrite. Pour java je pense pas qu'on puisse faire la même chose.

J'ai une erreur The method EcritChaine(String, OutputStream) is undefined for the type BitCopy.

Pour #13#13, comment on peut la réaliser en java.

Merci pour votre aide.