Discussion :

[pottiez]

Bonjour à tous,

La FAQ C++ Builder a été mise à jour !

• 28 nouvelles questions/réponses, dont 10 sur la gestion du Windows Image Acquisition (WIA) via OLE
• 10 questions/réponses mises à jour

N'hésitez pas à donner vos avis, remarques, corrections ou suggestions, cette discussion est là pour ça !

Cordialement,
pottiez

[dz_robotix]

Merci pour l'info !

[sat83]

Dans ce nouveau post de la FAQ il y a une erreur de frappe: TSearchRect au lieu de TSearchRec.

[sat83]

Sauf erreur de ma part (je n'ai pas BCB sous la main), la fonction Search de la FAQ ne permet pas de descendre dans les sous-répertoires (car Name fournie uniquement le nom de fichier, pas le chemin) .
J'aurais proposé une fonction du type:

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
20
21
void Search( TStrings *listFile, AnsiString dir/*, AnsiString filtre*/)
{
  TSearchRec sr;
  int retour ;
  if( dir[dir.Length()-1] != '\\')
    dir += "\\";
 
  retour = FindFirst(dir+"*"/*+filtre*/, faAnyFile, sr);
  while(retour == 0)
  {
    if( (sr.Name != "..") && (sr.Name != ".") )
    {
      if((sr.Attr & faDirectory) != 0)
        Search( listFile, dir+sr.Name/*, filtre*/ );
      else
        listFile->Add( dir+sr.Name );
    }
    retour = FindNext(sr);
  }
  FindClose(sr);
}

- J'ai enlevé le paramètre filtre mais on peut le laisser, même si il n'est pas utile si on veut les sous-répértoires.
- Il est possible d'ajouter un paramètre extension comme c'est le cas dans le post précédant de la FAQ.
- J'ai utilisé TStrings et AnsiString

[DjmSoftware]

Bonjour
la FAQ concernant l'utilisation des objets automations (Variant) nécessite une mise à jour
les exemples utilisation les fonctions OleFunction avec l'emploi de paramétre(s) nécessite que les paramètres soient de Type WideString pour l'emploi de texte avec les nouvelles versions de C++Builder

exemple de la FAQ concernant OpenOffice/LibreOffice

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
vOOoDesktop = vOOoOpenOffice.OleFunction("CreateInstance", "com.sun.star.frame.Desktop");
// provoque l'exception suivante
// type de variable incorrecte
// la traduction correcte est
vOOoDesktop = vOOoOpenOffice.OleFunction(L"createInstance",WideString(L"com.sun.star.frame.Desktop));

cordialement