DETECTGRAPH |
Détecte un graphique |
---|---|
Free Pascal | Graph |
Syntaxe
Procedure DetectGraph(Var GraphDriver,GraphMode:SmallInt); |
Paramètres
Nom | Description |
---|---|
GraphDriver | Ce paramètre retourne le numéro du pilote supporté. |
GraphMode | Ce paramètre retourne le plus haut mode vidéo supporté. |
Description
Cette procédure permet d'effectuer la détection de la carte vidéo et de recommander le pilote vidéo préférable ainsi que son mode graphique maximal.
Remarques
- ATTENTION ! Si vous utilisez le clavier sous le système d'exploitation Windows avec cette unité, il faudra utilisé l'unité wincrt plutôt que Crt, car l'unité Crt gère la fenêtre de console et non pas la fenêtre GUI.
- ATTENTION ! Si vous utilisez la souris sous le système d'exploitation Windows avec cette unité, il faudra utilisé l'unité winmouse plutôt que Mouse, car l'unité Mouse gère la fenêtre de console et non pas la fenêtre GUI.
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');
- HercMono:WriteLn('Carte vidéo de type Hercule');
- VGA:WriteLn('Carte vidéo de type VGA');
- Else WriteLn('Pilote : ',pilote);
- End;
- Case mode of
- 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');
- Else WriteLn('Mode vidéo : ',mode);
- End;
- END.
Dernière mise à jour : Samedi, le 18 juillet 2015