va_list et TVarRec

Version imprimable

27/10/2008, 15h55
yozart

va_list et TVarRec

Bonjour a tous,

j'ai une méthode qui contient une liste variable d'arguments. Mon problème est que dans certains cas, cette liste d'argument doit me servir dans AnsiString::Format.

Evidemment, AnsiString::Format n'utilise pas un va_list mais un TVarRec et je n'arrive rien a faire.

Mon but est de pouvoir utiliser AnsiString::Format en lui fournissant la liste de paramètres recus par ma methode.

Si vous avez une solution en vue, n'hésitez pas a m'en faire part car je seche grave. Merci beaucoup.

J'ai peut être trouvé une piste. Mais mon problème est désormais autre. Tout d'abord, j'ai trouvé cela:
src= http://www.codeproject.com/KB/tips/va_pass.aspx

Code:

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
 
template<byte count>
struct SVaPassNext{
    SVaPassNext<count-1> big;
    DWORD dw;
};
template<> struct SVaPassNext<0>{};
//SVaPassNext - is generator of structure of any size at compile time.
 
 
class CVaPassNext{
public:
    SVaPassNext<50> svapassnext;
    CVaPassNext(va_list & args){
		try{//to avoid access violation
 
			memcpy(&svapassnext, args, sizeof(svapassnext));
		} catch (...) {}
    }
};
#define va_pass(valist) CVaPassNext(valist).svapassnext
 
#if 0 //using:
 
void MyVA_Function(szFormat, ...){
    va_list args;
    va_start(args, szFormat);
    SomeOtherVA_Function(szFormat, va_pass(args));
    va_end(args);
}
#endif

j'ai donc modifié ma fonction comme suit:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
void test(AnsiString t, ...)
{
   int total = 0;
   va_list ap;
   va_start( ap, t );
 
   TVarRec v[] = ARRAYOFCONST(va_pass(ap));
   AnsiString res = Format(t, v, ARRAYSIZE(v) - 1);  
   printf("%s\n", res.c_str());
 
   va_end(ap);
}

Mais désormais, j'ai une erreur: [C++ Error] Unit1.cpp(57): E2108 Utilisation impropre de typedef 'OpenArray<TVarRec>'

c'est au niveau de la ligne "TVarRec v[] = ARRAYOFCONST(va_pass(ap))"

Tout ceci me semble bien compliqué (je dois avouer que je ne comprends pas complètement l'exemple de l'article que tu cites).

Néanmoins, si on regarde la définition de TVarRec (qui est fausse dans la version de l'aide que j'ai), c'est juste un "union" qui permet d'aller lire les différents type de données:

Code:

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
  class TVarRec
  {
  public:
    union
    {
      Integer      VInteger;
#if defined(TVARREC64)
      Largeint     VInt64;
#endif
      Boolean      VBoolean;
      Char         VChar;
      PExtended    VExtended;
      PShortString VString;
      Pointer      VPointer;
      PChar        VPChar;
      TObject*     VObject;
      TClass       VClass;
      WideChar     VWideChar;
      PWideChar    VPWideChar;
      Pointer      VAnsiString;
      PCurrency    VCurrency;
      PVariant     VVariant;
    };
    union
    {
      Byte VType;
      /*
      long ForceAlignment;
  #if 0
    //! The ForceAlignment should be removed, if alignment set to 4
    //! we don't need this
  #endif
      */
    };

Donc, il doit être possible de caster la va_list en un TVarRec. J'ai essayé ceci:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 
  Test(3,"123","456","789");
 
}
//---------------------------------------------------------------------------
void TForm1::Test(int size,...) {
 
  va_list ap;
  va_start(ap, size);
  System::TVarRec *args=(System::TVarRec*)(ap);
 
  AnsiString result=Format("%s %s %s",args,size-1);
  ShowMessage(result);
 
}

Ca ne marche pas :cry: mais c'est peut-être une piste à explorer

06/11/2008, 11h37
yozart

merci pour ta réponse... Finalement, j'abandonne la chose pour le moment, mais si jamais une illumination venait, je vous en ferait bien evidemment part. Merci quand meme grandement a toi.