IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Turbo Pascal Discussion :

[TP]Charger un fichier bmp


Sujet :

Turbo Pascal

  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2002
    Messages
    13
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2002
    Messages : 13
    Points : 8
    Points
    8
    Par défaut [TP]Charger un fichier bmp
    Bonjour,

    Pourriez vous me dire comment afficher un fichier bmp en mode vga sous TP7?

    Merci d'avance.

  2. #2
    Membre émérite

    Homme Profil pro
    Urbaniste
    Inscrit en
    Mars 2002
    Messages
    255
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Aveyron (Midi Pyrénées)

    Informations professionnelles :
    Activité : Urbaniste

    Informations forums :
    Inscription : Mars 2002
    Messages : 255
    Points : 2 717
    Points
    2 717
    Par défaut
    Faut savoir la "déchiffrer". Il existe plusieurs unités qui gèrent ça. Je te conseille la mienne (http://www.developpez.com/unite). Problème : elle utilise VESA et non pas simplement le mode VGA (mais tu peux l'adapter simplement).

    uses Vesa2,Bmp,Clavier;
    begin
    LanceMode (640,480,8); { 640x480 pixels, 8 bits/pixel }
    AfficheBmp (-1,-1,'image.bmp'); { (-1,-1) = centré }
    LitTouche;
    ModeTxt;
    end.

    Ca gère les images 4,8 et 24 bits/pixel (16, 256, 16.7 millons de couleurs), compressées ou non. Je te conseille de les compresser, voir d'utiliser le format PCX qui compresse encore mieux ... mais est moins courant. Microsoft Paint les gère ??? Paint Shop Pro le reconnait très bien, ACD See aussi.

    uses Vesa2,Pcx,Clavier;
    begin
    LanceMode (640,480,8);
    AffichePcx (-1,-1,'image.bmp'); { (-1,-1) = centré }
    LitTouche;
    ModeTxt;
    end.

    C'est la même syntaxe ;-)
    @+ Haypo

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mars 2002
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2002
    Messages : 5
    Points : 5
    Points
    5
    Par défaut
    Charly,

    Voilà un bonne doc si tu veux :

    http://fucke.multimania.com/formatbmp.pdf

  4. #4
    Membre averti Avatar de charly
    Profil pro
    Inscrit en
    Mars 2002
    Messages
    329
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2002
    Messages : 329
    Points : 358
    Points
    358
    Par défaut
    non moi je les lit correctement je suis e qu on m a demander de faire ... je lis la taille et a partir de la j en deduis le nombre de ligne et de colone et avec sa je charge un bmp mais sa ne marche pas ...
    je doitt faire une erreur ...
    @+charly

  5. #5
    Membre expert
    Avatar de Eric Sigoillot
    Inscrit en
    Mars 2002
    Messages
    1 212
    Détails du profil
    Informations personnelles :
    Âge : 40

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 212
    Points : 3 369
    Points
    3 369
    Par défaut
    As-tu seulement regardé nos unités (celle d'Haypo et la mienne) ?

    Ce n'est pas si compliqué.

    Je précise d'ailleurs en passant que mon unité, contrairement à celle d'Haypo, lit en prime les images bitmaps monochromes, ainsi que les images "bizarres" que j'ai pu rencontrer. Elle lit même les images "à l'envers", spécifiées dans la doc Windows... et qu'aucun programme Windows n'est capable de lire !

    Pour avoir la dernière version, mailez-moi. Je la donnerais bientôt à Haypo.

    A+

  6. #6
    Membre émérite

    Homme Profil pro
    Urbaniste
    Inscrit en
    Mars 2002
    Messages
    255
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Aveyron (Midi Pyrénées)

    Informations professionnelles :
    Activité : Urbaniste

    Informations forums :
    Inscription : Mars 2002
    Messages : 255
    Points : 2 717
    Points
    2 717
    Par défaut
    Format BMP :
    Entête (Windows ou OS2) : chercher de la doc, ou copier/coller les structures de mon unité
    Palette (si on a une image en 1, 4 ou 8 bits/pixel)
    Données (image renversée verticalement)

    Les données : ligne/ligne alignée sur 32 bits. Donc si l'image fait 31 pixels de large, il faudra lire 32 pixels. On ajoute (4-Larg and 3) si Larg and 3 ne vaut pas zéro. Faut 2 variables : une pour la taille exacte (pour l'affichage à l'écran), une pour la taille en octets (taille dans le fichier).

    Après faut savoir lire le 1 bit/pixel, 4, 8 et 24.

    @+ Haypo

Discussions similaires

  1. [VB6] Convertion d'un fichier bmp en jpg
    Par WOLO Laurent dans le forum VB 6 et antérieur
    Réponses: 22
    Dernier message: 12/01/2015, 13h22
  2. [Forms6i] Comment charger les fichiers du client ?
    Par patmaba dans le forum Forms
    Réponses: 10
    Dernier message: 31/01/2005, 16h17
  3. Charger des fichiers d'un repertoire
    Par demanghonj dans le forum Entrée/Sortie
    Réponses: 4
    Dernier message: 05/01/2005, 17h23
  4. [Dexplore] Comment charger des fichiers d'aide ?
    Par Laurent Dardenne dans le forum Windows
    Réponses: 5
    Dernier message: 04/01/2005, 17h38
  5. Un fichier .bmp comme paramètre d'une Procédure stockée
    Par FONKOU dans le forum Bases de données
    Réponses: 2
    Dernier message: 28/10/2004, 17h56

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo