DETECTGRAPH |
Détection graphique |
|---|---|
| QuickPascal | Graph |
Syntaxe
| Procedure DetectGraph(Var pilote,mode:Integer); |
Paramètres
| Nom | Description | ||
|---|---|---|---|
| pilote | Ce paramètre retourne le numéro du pilote supporté : | ||
| Constante | Valeur | Description | |
| CurrentDriver | -128 | Cette constante permet d'indiquer le pilote courant pour la procédure GetModeRange | |
| Detect | 0 | Cette constante permet d'indiquer une autodétection | |
| CGA | 1 | Cette constante permet d'indiquer une carte vidéo de type CGA | |
| MCGA | 2 | Cette constante permet d'indiquer une carte vidéo de type MCGA | |
| EGA | 3 | Cette constante permet d'indiquer une carte vidéo de type EGA | |
| EGA64 | 4 | Cette constante permet d'indiquer une carte vidéo de type EGA 64 Ko | |
| EGAMono | 5 | Cette constante permet d'indiquer une carte vidéo de type EGA monochrome | |
| IBM8514 | 6 | Cette constante permet d'indiquer une carte vidéo de type IBM 8514 | |
| HercMono | 7 | Cette constante permet d'indiquer une carte vidéo de type Hercule | |
| ATT400 | 8 | Cette constante permet d'indiquer une carte vidéo de type AT&T 400 | |
| VGA | 9 | Cette constante permet d'indiquer une carte vidéo de type VGA | |
| PC3270 | 10 | Cette constante permet d'indiquer une carte vidéo de type PC 3270 | |
| mode | Ce paramètre retourne le plus haut mode vidéo supporté : | ||
| Constante | Valeur | Description | |
| CGAC0 | 0 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| CGAC1 | 1 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| CGAC2 | 2 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| CGAC3 | 3 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| CGAHi | 4 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| MCGAC0 | 0 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| MCGAC1 | 1 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| MCGAC2 | 2 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| MCGAC3 | 3 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| MCGAMed | 4 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| MCGAHi | 5 | Cette constante permet le mode vidéo 640 x 480 pixels | |
| EGAMonoHi | 3 | Cette constante permet le mode vidéo 640 x 350 pixels | |
| HercMonoHi | 0 | Cette constante permet le mode vidéo 720 x 348 pixels | |
| VGALo | 0 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| VGAMed | 1 | Cette constante permet le mode vidéo 640 x 350 pixels | |
| VGAHi | 2 | Cette constante permet le mode vidéo 640 x 480 pixels | |
| EGALo | 0 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| EGAHi | 1 | Cette constante permet le mode vidéo 640 x 350 pixels | |
| EGA64Lo | 0 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| EGA64Hi | 1 | Cette constante permet le mode vidéo 640 x 350 pixels | |
| ATT400C0 | 0 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| ATT400C1 | 1 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| ATT400C2 | 2 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| ATT400C3 | 3 | Cette constante permet le mode vidéo 320 x 200 pixels | |
| ATT400Med | 4 | Cette constante permet le mode vidéo 640 x 200 pixels | |
| ATT400Hi | 5 | Cette constante permet le mode vidéo 640 x 400 pixels | |
| IBM8514Lo | 0 | Cette constante permet le mode vidéo 640 x 480 pixels | |
| IBM8514Hi | 1 | Cette constante permet le mode vidéo 1024 x 768 pixels | |
| PC3270Hi | 0 | Cette constante permet le mode vidéo 720 x 350 pixels | |
Description
Cette procédure permet d'effectuer la détection de la carte vidéo et de recommander le pilote vidéo BGI préférable ainsi que son mode graphique maximal.
Remarques
- La procédure DetectGraph examine la configuration de l'ordinateur et indique le pilote et le mode optimaux à utiliser pour toutes les opérations graphiques suivantes. Les valeurs de pilote et mode sont généralement transmises à la procédure InitGraph.
- Cette procédure est contenu dans l'unité «Graph», afin qu'elle fournisse des services de compatibilité avec Turbo Pascal. Dans les faits, elle appel l'unité «MSGraph», il faut donc que le programme est accès au pilote «ATT6300.VID», «CGASNOW.VID», «ERICSSON.VID», «HERC102.VID» et «HERC112.VID» ainsi qu'aux polices de caractères «COURB.FON», «HELVB.FON», «MODERN.FON», «ROMAN.FON», «SCRIPT.FON» et «TMSRB.FON».
Exemple
Voici un exemple d'une utilisation typique de cette procédure :
- Program DetectGraphSamples;
-
- Uses Graph;
-
- Var pilote,mode:Integer;
-
- BEGIN
- DetectGraph(pilote,mode);
- Case pilote of
- CurrentDriver:WriteLn('Pilote courant pour la procédure GetModeRange');
- Detect:WriteLn('Autodétection');
- CGA:WriteLn('Carte vidéo de type CGA');
- MCGA:WriteLn('Carte vidéo de type MCGA');
- EGA:WriteLn('Carte vidéo de type EGA');
- EGA64:WriteLn('Carte vidéo de type EGA 64 Ko');
- EGAMono:WriteLn('Carte vidéo de type EGA monochrome');
- IBM8514:WriteLn('Carte vidéo de type IBM 8514');
- HercMono:WriteLn('Carte vidéo de type Hercule');
- ATT400:WriteLn('Carte vidéo de type AT&T 400');
- VGA:WriteLn('Carte vidéo de type VGA');
- PC3270:WriteLn('Carte vidéo de type PC 3270');
- End;
- Case mode of
- CGAC0:WriteLn('Mode vidéo 320 x 200 pixels');
- CGAC1:WriteLn('Mode vidéo 320 x 200 pixels');
- CGAC2:WriteLn('Mode vidéo 320 x 200 pixels');
- CGAC3:WriteLn('Mode vidéo 320 x 200 pixels');
- CGAHi:WriteLn('Mode vidéo 640 x 200 pixels');
- MCGAC0:WriteLn('Mode vidéo 320 x 200 pixels');
- MCGAC1:WriteLn('Mode vidéo 320 x 200 pixels');
- MCGAC2:WriteLn('Mode vidéo 320 x 200 pixels');
- MCGAC3:WriteLn('Mode vidéo 320 x 200 pixels');
- MCGAMed:WriteLn('Mode vidéo 640 x 200 pixels');
- MCGAHi:WriteLn('Mode vidéo 640 x 480 pixels');
- EGAMonoHi:WriteLn('Mode vidéo 640 x 350 pixels');
- HercMonoHi:WriteLn('Mode vidéo 720 x 348 pixels');
- VGALo:WriteLn('Mode vidéo 640 x 200 pixels');
- VGAMed:WriteLn('Mode vidéo 640 x 350 pixels');
- VGAHi:WriteLn('Mode vidéo 640 x 480 pixels');
- EGALo:WriteLn('Mode vidéo 640 x 200 pixels');
- EGAHi:WriteLn('Mode vidéo 640 x 350 pixels');
- EGA64Lo:WriteLn('Mode vidéo 640 x 200 pixels');
- EGA64Hi:WriteLn('Mode vidéo 640 x 350 pixels');
- ATT400C0:WriteLn('Mode vidéo 320 x 200 pixels');
- ATT400C1:WriteLn('Mode vidéo 320 x 200 pixels');
- ATT400C2:WriteLn('Mode vidéo 320 x 200 pixels');
- ATT400C3:WriteLn('Mode vidéo 320 x 200 pixels');
- ATT400Med:WriteLn('Mode vidéo 640 x 200 pixels');
- ATT400Hi:WriteLn('Mode vidéo 640 x 400 pixels');
- IBM8514Lo:WriteLn('Mode vidéo 640 x 480 pixels');
- IBM8514Hi:WriteLn('Mode vidéo 1024 x 768 pixels');
- PC3270Hi:WriteLn('Mode vidéo 720 x 350 pixels');
- End;
- END.
on obtiendra le résultat semblable suivant :
Carte vidéo de type VGAMode vidéo 320 x 200 pixels
Dernière mise à jour : Vendredi, le 13 février 2015