Discussion :

[moubark]

salut, mon programme permet de lire le secteur d'une disquette en utilisant le Dos Pascal. Mon problème est comment afficher le contenu du secteur lis (se trouvant dans le Buffer).

Mon code ci dessous lis bien le secteur ,mais m'affiche rien à l'écran.

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
 
 
program lecture_disquette;
uses crt,Dos;
var regs : Registers;
    P : Pointer;
begin
clrscr;
regs.AH:=$02;              {la fonction de lecture}
regs.CL:=$01;              {le numero de secteur à lire}
regs.CH:=$00               {le numero de piste à lire }
regs.DH:=$0;                {le numero de tete à lire};
regs.AL:=$01                {le nombre de secteur à lire}
regs.DL:=$00;               {le numero de lecteur de disquette conserné}
 
GetMem(p,512);            {alloue de 512 octets}
regs.ES:=seg(p^);        {pointer sur le segment du buffer}
regs.BX:=ofs(p^);         {pointer sur l'offset du buffer }
intr($13,regs);
 
readln;
end.

[M.Dlb]

Tu obtiens 512 octets dans le buffer, pour les afficher le mieux est de faire ca sous forme de tableau en code hexa, en s'inspirant de certains éditeurs hexadécimals.

[moubark]

merci Wormful Sickfoot ,j'ai vus l'utilisage des tableaux, mais je sais pas aussi comment les afficher,si tu pourais m'edaier ça sera avec plaisir.

[M.Dlb]

Tu lis les secteurs des disquettes mais tu sais pas afficher un tableau ? Faudrait apprendre à programmer dans le bon sens

Sinon avec des boucles for pour parcourir le tableau, et des write on s'en sort assez facilement.

[moubark]

Tu lis les secteurs des disquettes mais tu sais pas afficher un tableau ? Faudrait apprendre à programmer dans le bon sens

Sinon avec des boucles for pour parcourir le tableau, et des write on s'en sort assez facilement.

merci,non c'est pas que je connais pas afficher un tableau ,mais plus tot que j'ai pas compris comment utiliser ici dans mon cadre (c'est à dire que j'ai pas pu metriser l'affichage du Buffer et surtout maintenant j'ai pas le temps pour fouetter par ci par la). j'aimerai que vous m'espliquez clairement comment je face ça.

[M.Dlb]

Tu as défini P comme étant un simple pointeur, mais ce n'est pas vraiment facile à manipuler tel quel. L'idéal c'est de déclarer P comme un pointer sur un tableau de byte. Ainsi tu pourras accéder aux données en "déréférençant" le pointeur. Un exemple ici:

http://mdalbin.developpez.com/tutori...al/tvpa/#LIV-B
et
http://mdalbin.developpez.com/tutori...pa/#LIII-B-2-d