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

Composants VCL Delphi Discussion :

Timage figé


Sujet :

Composants VCL Delphi

  1. #1
    Futur Membre du Club
    Inscrit en
    Octobre 2003
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Octobre 2003
    Messages : 6
    Points : 5
    Points
    5
    Par défaut Timage figé
    Bonjour,
    j'ai actuellement un code qui me permet de recuperer une image sur un site et de l'afficher.
    Le hic c'est que l'image est la mais pour la voir je dois reduire ma fenetre et la reouvrir ....
    pictuire:=nil; c'est idem impossible de faire disparaitre ou de modifier l'image ???
    je suis un peu perdu

    voici le code

    Merci

    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
    try
        strStream := idhttp1.Get('http://url_de_mon_image');
      except
        ShowMessage(houps');
        Exit;
      end;
     
       memImage := TMemoryStream.Create;
      Jp   := TJPEGImage.Create;
      try
        memImage.Write(strStream[1], Length(strStream));
        memImage.Position := 0;
        Jp.LoadFromStream(memImage);
        Image1.Picture.Assign(Jp);
     
      finally
        memImage.Free;
        Jp.Free;
      end;

    [Modération Hdd34]
    Merci de penser aux balises code à l'avenir...

  2. #2
    Modérateur
    Avatar de tourlourou
    Homme Profil pro
    Biologiste ; Progr(amateur)
    Inscrit en
    Mars 2005
    Messages
    3 858
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Biologiste ; Progr(amateur)

    Informations forums :
    Inscription : Mars 2005
    Messages : 3 858
    Points : 11 301
    Points
    11 301
    Billets dans le blog
    6
    Par défaut
    Image1.Refresh ?
    Delphi 5 Pro - Delphi 11.3 Alexandria Community Edition - CodeTyphon 6.90 sous Windows 10 ; CT 6.40 sous Ubuntu 18.04 (VM)
    . Ignorer la FAQ Delphi et les Cours et Tutoriels Delphi nuit gravement à notre code !

  3. #3
    Futur Membre du Club
    Inscrit en
    Octobre 2003
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Octobre 2003
    Messages : 6
    Points : 5
    Points
    5
    Par défaut
    Citation Envoyé par tourlourou
    Image1.Refresh ?
    Deja essayé
    trop facile
    merci qd meme

    Franck

  4. #4
    bjl
    bjl est déconnecté
    Membre averti Avatar de bjl
    Profil pro
    Inscrit en
    Décembre 2002
    Messages
    263
    Détails du profil
    Informations personnelles :
    Localisation : Brésil

    Informations forums :
    Inscription : Décembre 2002
    Messages : 263
    Points : 338
    Points
    338
    Par défaut
    Bonjour,

    c'est pas plutôt "memImage.Read(strStream[1], Length(strStream));" qu'il faudrait ?

  5. #5
    Modérateur
    Avatar de tourlourou
    Homme Profil pro
    Biologiste ; Progr(amateur)
    Inscrit en
    Mars 2005
    Messages
    3 858
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Biologiste ; Progr(amateur)

    Informations forums :
    Inscription : Mars 2005
    Messages : 3 858
    Points : 11 301
    Points
    11 301
    Billets dans le blog
    6
    Par défaut
    l'image est la mais pour la voir je dois reduire ma fenetre et la reouvrir
    quels sont alors les événements générés qui peuvent permettre l'affichage de l'image, sinon le Repaint ?

    as-tu bien affecté un Parent à Image1 ? (facile, mais bon...)

    sinon, regarde dans le FormActivate ou le OnShow...
    Delphi 5 Pro - Delphi 11.3 Alexandria Community Edition - CodeTyphon 6.90 sous Windows 10 ; CT 6.40 sous Ubuntu 18.04 (VM)
    . Ignorer la FAQ Delphi et les Cours et Tutoriels Delphi nuit gravement à notre code !

Discussions similaires

  1. Timage et Canvas??
    Par vanack dans le forum C++Builder
    Réponses: 4
    Dernier message: 14/04/2007, 11h38
  2. [TImage] Transfert de Picture par pixels.
    Par H2D dans le forum Langage
    Réponses: 9
    Dernier message: 25/10/2003, 14h37
  3. vider un timage
    Par gIch dans le forum Composants VCL
    Réponses: 2
    Dernier message: 23/08/2002, 23h58
  4. TImage
    Par Thylia dans le forum C++Builder
    Réponses: 5
    Dernier message: 09/07/2002, 20h03
  5. Création dynamique de TImages
    Par Dric dans le forum C++Builder
    Réponses: 10
    Dernier message: 08/07/2002, 12h36

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