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

 C++ Discussion :

Transcription Delphi en C++


Sujet :

C++

  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Juillet 2003
    Messages
    803
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2003
    Messages : 803
    Par défaut Transcription Delphi en C++
    Bonjour à tous

    J'ai transcrit une fonction Delphi en C++ telle que
    :
    Code C : 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
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    //**************** Fonction initialisation segmentation ********************
     
    int InitSegmentationOk(	const unsigned int Degree, const int Speed,
    const double Start, const bool CustomOK,
    const bool BlackButtom, TPeekSegCfg CurSeg)
    {
        CurSeg.Degree = Degree;
        CurSeg.Speed = Speed;
        CurSeg.Start = Start;
        CurSeg.CustomOk = CustomOK;
        CurSeg.BlackButtom = BlackButtom;
        CurSeg.RBGStep = 256/pow((32*pow(2.0,Degree)),(1.0/3.0));
        CurSeg.NbrCalcSeg = (int)(32*pow(2.0,Degree));
        CurSeg.NbrUsedSeg = 0;
        CurSeg.Segvec = (TPeekSegment*)malloc(CurSeg.NbrCalcSeg*sizeof(TPeekSegment));
        CurSeg.CubeRGBvec = (Cube*)malloc(CurSeg.NbrCalcSeg*sizeof(Cube));
     
        for(int k=0;k< CurSeg.NbrCalcSeg;k++)
        {
            //Initialisation du vecteur de structures Segvec
            CurSeg.Segvec[k].SegNo = k+1;
            CurSeg.Segvec[k].OrdBySize = 0;
            CurSeg.Segvec[k].dEmax = 0.0;
            CurSeg.Segvec[k].Used = true;
            CurSeg.Segvec[k].Deleted = false;
            CurSeg.Segvec[k].Added = false;
            CurSeg.Segvec[k].ControlOK = false;
            CurSeg.Segvec[k].PixSize = 0;
            CurSeg.Segvec[k].Percent = 0.0;
            for(int i=0;i<3;i++)
            {
                CurSeg.Segvec[k].LChmean[i]= 0.0;
                CurSeg.Segvec[k].Labmean[i]= 0.0;
                CurSeg.Segvec[k].LChmin[i]= 0.0;
                CurSeg.Segvec[k].LChmax[i]= 0.0;
                CurSeg.Segvec[k].RGBmean[i]= 0.0;
            }
        }
     
        CurSeg.InitOK = CurSeg.NbrCalcSeg >= 64;
        CurSeg.NbrDeleted = 0;
        CurSeg.NbrAdded = 0;
        CurSeg.NbrControl = 0;
        if(CurSeg.InitOK)
            return 0;
        else
            return -1;
    }
    Si je trace l'appel de la fonction InitSegmentationOk(1,1,1.0,true,false,* CurSeg) :
    ligne 13 CurSeg->NbrCalcSeg = 64 ce qui est attendu
    mais à l'affichage dans un Tedit j'obtiens la valeur 1635652

    Quelqu'un peut-il me dire d'où vient ce problème ?

  2. #2
    Expert éminent

    Femme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Juin 2007
    Messages
    5 202
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels

    Informations forums :
    Inscription : Juin 2007
    Messages : 5 202
    Par défaut
    D'ailleurs.
    Ton code ne montre pas l'affichage, ni même l'appel de la fonction.

    A priori, c'est une erreur d'affichage

Discussions similaires

  1. Différences entre Delphi et Visual Basic ?
    Par Anonymous dans le forum Débats sur le développement - Le Best Of
    Réponses: 75
    Dernier message: 30/03/2009, 20h09
  2. Transcription Excel vers Delphi
    Par liazidf dans le forum Débuter
    Réponses: 9
    Dernier message: 30/06/2008, 14h14
  3. Réponses: 2
    Dernier message: 17/10/2005, 12h45
  4. Réponses: 4
    Dernier message: 27/03/2002, 11h03
  5. Réponses: 2
    Dernier message: 20/03/2002, 23h01

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