Discussion :

[Mercenaire]

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.

[wax78]

Salut,

Pour bien faire, je t'invite a lire ce tutoriel qui probablement te permettra de comprendre comment lire/écrire des fichiers en java.

[thelvin]

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.

Je ne connais pas Pascal, mais en Java, pour initialiser un fichier en lecture, on fait new FileInputStream(), et pour l'initialiser en écriture, new FileOutputStream().
Donc fondamentalement, il semble que tu aies refait la même chose en Java.

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

C'est bizarrement dit, mais cela vient du fait que EcritChaine n'est pas statique, et que tu l'appelles depuis la méthode main(), qui, elle, est statique.

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

'Faudrait nous dire ce que ça fait en Delphi... Mais bon, apparemment ce sont des caractères carriage return, que tu peux obtenir avec \r exactement de la même manière que \n ou \t


Je me permets quand même de te signaler que le programme en Delphi, lui, il est capable de lire et écrire les fichiers bit par bit, et non pas octet par octet.

[Mercenaire]

C'est bizarrement dit, mais cela vient du fait que EcritChaine n'est pas statique, et que tu l'appelles depuis la méthode main(), qui, elle, est statique.

J'ai cette erreur parce que la méthode public void EcrireChaine (String ch, FichierBit f) requière un objet de type FichierBit et moi j'envoi un objet fout de type FileOutputStream. Comment peut on crée cette association.

[thelvin]

J'ai cette erreur parce que la méthode public void EcrireChaine (String ch, FichierBit f) requière un objet de type FichierBit et moi j'envoi un objet fout de type FileOutputStream.

Ah mais oui, je suis con.

Comment peut on crée cette association.

Ben... En créant une classe FichierBit qui s'appuie sur un OutputStream, tiens !
Tu pensais pas sérieusement qu'une telle classe existerait déjà, quel intérêt ?

[Mercenaire]

Ah mais oui, je suis con.



Ben... En créant une classe FichierBit qui s'appuie sur un OutputStream, tiens !
Tu pensais pas sérieusement qu'une telle classe existerait déjà, quel intérêt ?

J'ai une classe FichierBit mais comment faire pour quelle s'appuie sur un OutputStream.

[thelvin]

J'ai une classe FichierBit mais comment faire pour quelle s'appuie sur un OutputStream.

Le problème de OutputStream c'est qu'il ne peut pas écrire des bits un par un. Au mieux il peut écrire des octets un par un, donc des bits huit par huit.

Et donc, quand on cherche à écrire un bit, un seul, on ne peut pas le donner directement à OutputStream.
Pour résoudre ça, ta classe FichierBit devrait mémoriser quels bits on lui a demandé décrire, dans quel ordre. Puis, dès qu'il y en a 8, les combiner en un octet qui contient ces bits dans cet ordre, et demander à un OutputStream d'écrire cet octet.
Après quoi, on peut oublier les bits qu'on vient décrire, et se remettre dans le même état qu'au début.

[Montor]

il n'existe pas de mot français en pascal lirechaine ecrirbit ne sont pas de fonctions standards en pascal d'ailleurs pascal comme la majorité des langage ne fait pas le traitement de bit par bit

#13

ça corresponde a \r