Discussion :

[moubark]

salut , j'essaies d'appeler la fonction 02h de l'écture de secteur d'une disquette
en utilisant la methode Intr() de la librairie Dos mais mon Delphi7 ne reconnait pas le Dos .dite mois si je dois utiliser une version un peux ancienne ,je peux m'en procurer. Merci votre aide

[Mac LAK]

Pas d'accès direct aux interruptions, ports et autres segments mémoire sur un OS 32 bits. Le langage n'y est pour rien.

[Paul TOTH]

Pas d'accès direct aux interruptions, ports et autres segments mémoire sur un OS 32 bits. Le langage n'y est pour rien.

plus exactement, pas d'API DOS/BIOS sous Win32 les interruptions existent toujours mais n'ont pas la même signification en mode protégé.

[Mac LAK]

plus exactement, pas d'API DOS/BIOS sous Win32 les interruptions existent toujours mais n'ont pas la même signification en mode protégé.

Effectivement, et elles sont tellement différentes que je n'ai (volontairement) pas pris la peine d'en parler.

Les IT DOS (21h) et VGA (10h) sont toujours partiellement utilisables pour la rétrocompatibilité binaire, mais il faut quand même le dire très vite : ça ne marche que tant que tu ne fais QUE des opérations basiques... Et ça t'envoie bouler dès que tu commences à taper dans le matériel directement, ce qui est typiquement le cas des IT disquettes / disque dur, ou des ports COM/LPT.

Et encore : je dois avouer que je n'ai jamais essayé, mais je ne suis pas certain que le support de ces IT soit actif / possible avec un EXE 32 bits, il doit sûrement falloir le faire avec un EXE 16 bits.

[Paul TOTH]

Effectivement, et elles sont tellement différentes que je n'ai (volontairement) pas pris la peine d'en parler.

Les IT DOS (21h) et VGA (10h) sont toujours partiellement utilisables pour la rétrocompatibilité binaire, mais il faut quand même le dire très vite : ça ne marche que tant que tu ne fais QUE des opérations basiques... Et ça t'envoie bouler dès que tu commences à taper dans le matériel directement, ce qui est typiquement le cas des IT disquettes / disque dur, ou des ports COM/LPT.

Et encore : je dois avouer que je n'ai jamais essayé, mais je ne suis pas certain que le support de ces IT soit actif / possible avec un EXE 32 bits, il doit sûrement falloir le faire avec un EXE 16 bits.

ni l'un ni l'autre, les interruptions DOS/BIOS ne sont disponibles qu'en mode réel ou en mode VM86 (la ligne de commande DOS)...même sous Windows 3.x qui était en mode protégé 16bits (Delphi 1) il n'était plus possible de les invoquer.

encore qu'il existait sous Win16 une fonction pour invoquer une interruption en mode réel...mais j'ai oublié son nom

[Mac LAK]

ni l'un ni l'autre, les interruptions DOS/BIOS ne sont disponibles qu'en mode réel ou en mode VM86 (la ligne de commande DOS)...même sous Windows 3.x qui était en mode protégé 16bits (Delphi 1) il n'était plus possible de les invoquer.

Étrange, ça : j'ai pourtant de vieux exécutables 16 bits qui tapent à plein pot dans ces vecteurs et qui continuent de marcher... Faudra que je fasse une ch'tite recherche archéologique dans mes archives pour vérifier ce point.

Après, les compilateurs Win16 et plus n'offrent plus ce support, en effet, seuls les compilateurs "DOS" le permettent. Mais l'exécutable produit reste normalement exécutable sous Win16/32, de mémoire.

[ShaiLeTroll]

Sinon moubark, fait toi un programme en ASM compile le avec un vieux MASM... lorsque je faisais des interruptions, c'était l'outil roi !
Tu as le bouquin "Assembleur Facile" Chez Marabou, tu verras, c'est facile jusqu'à la page 80 après on comprend que c'est un vrai bouquin de philosophie paradoxale ...

Ou alors le Turbo Pascal 7, j'ai un pote qui avait tout codé en ASM de l'interruption clavier, horloge et graphique ... il avait même poussé le vice à utiliser la mémoire graphique sur des petits machines sans écran comme serveur de traitement ...

[moubark]

Sinon moubark, fait toi un programme en ASM compile le avec un vieux MASM... lorsque je faisais des interruptions, c'était l'outil roi !
Tu as le bouquin "Assembleur Facile" Chez Marabou, tu verras, c'est facile jusqu'à la page 80 après on comprend que c'est un vrai bouquin de philosophie paradoxale ...

Ou alors le Turbo Pascal 7, j'ai un pote qui avait tout codé en ASM de l'interruption clavier, horloge et graphique ... il avait même poussé le vice à utiliser la mémoire graphique sur des petits machines sans écran comme serveur de traitement ...

Merci voici j'ai essaie avec pascal mais je suis coinser avec l'affichage.
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.

[ShaiLeTroll]

Utilise BinToHex pour transformer P^en chaine Hexa, et un simple ShowMessage suffira ensuite

[anapurna]

salut

regarde du cote de DeviceIoControl

@+ Phil