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

Delphi Discussion :

Appel aux pros : pourquoi les pointeurs sont-ils plus rapides ?


Sujet :

Delphi

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    juillet 2003
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juillet 2003
    Messages : 61
    Points : 47
    Points
    47
    Par défaut Appel aux pros : pourquoi les pointeurs sont-ils plus rapides ?
    bonjour à tous,

    voilà je programme depuis longtemps en delphi, en amateur, et je n'ai jamais eu à faire aux pointeurs.
    Aujourd'hui je me fais une fonction pour transformer une image couleur en niveaux de gris, à ma façon, et puis je trouve sur le net la même fonction à première vue identique, mais celle-ci utilise un pointeur.

    je décide de tester la rapidité des 2 solutions et là, STUPEUR : Ma fonction mets 400ms et l'autre 15 !!!

    donc 2 questions:
    - pourquoi ?
    - où peut-on trouver un bon tuto sur l'avantage des pointeurs et leur mise en oeuvre ?

    merci

    la fonction avec pointeur
    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
    function Grey1(Bitmap: TBitmap): TBitmap;
    var h,v: Integer;
    Row:^TRGBTriple;
    begin
    Bitmap.PixelFormat:=pf24bit;
      for v := 0 to Bitmap.Height - 1 do
      begin
      Row:=Bitmap.ScanLine[v];
      for h := 0 to Bitmap.Width - 1 do
      begin
      Row.rgbtBlue :=(Row.rgbtBlue +Row.rgbtGreen +Row.rgbtRed)div 3;
      Row.rgbtGreen:=Row.rgbtBlue;Row.rgbtRed  :=Row.rgbtBlue;
      end;
      inc(row);
      end;
        Result := Bitmap;
    end;
    ma fonction sans pointeurs

    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
    function Grey2(Bitmap: TBitmap): TBitmap;
    var h,v: Integer;
    R,G,B:byte;
    color:integer;
    begin
    Bitmap.PixelFormat:=pf24bit;
      for v := 0 to Bitmap.Height - 1 do
      for h := 0 to Bitmap.Width - 1 do
      begin
      color:=Bitmap.Canvas.Pixels[h,v];
      R:=byte(color);
      G:=byte(color shr 8);
      B:=byte(color shr 16);
      R:=(R+B+G)div 3;
      Bitmap.Canvas.Pixels[h,v]:=rgb(r,r,r);
      end;
        Result := Bitmap;
    end;

  2. #2
    Membre éprouvé
    Avatar de CapJack
    Homme Profil pro
    Prof, développeur amateur vaguement éclairé...
    Inscrit en
    mars 2004
    Messages
    622
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Prof, développeur amateur vaguement éclairé...
    Secteur : Enseignement

    Informations forums :
    Inscription : mars 2004
    Messages : 622
    Points : 984
    Points
    984
    Par défaut
    Tu te trompes : ce n'est pas l'utilisation des pointeurs qui est à l'origine de l'accroissement de performance, mais l'utilisation de ScanLine, qui est beaucoup plus performante que la propriété Pixels.

    Le fait que ScanLine renvoie un pointeur est un fait, mais ce n'est pas celà en soi qui explique la différence de performance.

    Il y a un article sur Scanline :
    http://nono40.developpez.com/tutorie.../efg/scanline/

    Sinon, étudier les pointeurs Pascal n'est pas une mauvaise idée, il y a plein de tutoriels pour ça !

  3. #3
    Membre du Club
    Profil pro
    Inscrit en
    juillet 2003
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juillet 2003
    Messages : 61
    Points : 47
    Points
    47
    Par défaut
    merci pour la précision.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Pourquoi les programmeurs sont-ils moins payés que les gestionnaires de programmes et les analystes métiers ?
    Par Hinault Romaric dans le forum Débats sur le développement - Le Best Of
    Réponses: 107
    Dernier message: 26/11/2014, 23h40
  2. Pourquoi les paramètres sont-ils assignables ?
    Par Iradrille dans le forum Débuter avec Java
    Réponses: 19
    Dernier message: 23/09/2013, 18h55
  3. Réponses: 7
    Dernier message: 23/09/2013, 16h49
  4. les objets sont-ils des pointeurs ?
    Par Rhyos dans le forum C++
    Réponses: 8
    Dernier message: 30/05/2012, 16h08
  5. Réponses: 2
    Dernier message: 11/05/2010, 20h36

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