Discussion :

[mima_mine]

Bonjour tous le monde

je veux savoir qu'es ce qu'on peut mettre comme paramètre dans la fonction Format ?

Code :

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

1
2
3
 
InfoType:=Format('\StringFileInfo\%0.4x%0.4x\FileVersion'#0,
                         [LoWord(LongInt(LangPtr^)), HiWord(LongInt(LangPtr^))]);

et il sert à quoi le #0 qui vient après la chaine de caractère ?

j'ai trouvé un tuto qui explique un peu mais je veux plus d'explication, pour que ma grammaire marche avec tous les cas

Cordialement

[Andnotor]

il sert à quoi le #0 qui vient après la chaine de caractère ?

A rien !

[Dr.Who]

un message qui cite l'un de mes tutos ... je me dois de répondre :

déja voici le liens vers le nouveau tuto, corrigé depuis :
http://deefaze.developpez.com/

ensuite :

#0 correspond à une chaine à zero terminal (chaine AZT).

il ne sert effectivement à rien puisque le type String de Delphi est AZT par défaut.

[mima_mine]

alors pourquoi on l'ajoute après la chaine ?

Code :

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

1
2
 
{tu sais ma question c'étatit pas sur la fonction format, mais quand j'ai vu  le #0 après la chaine j'ai cru que c'est spécial à cette fonction }

donc le compilateur l'accepte ? mais ma grammaire n'a pas accepter cette syntaxe, normalement si on veut ecrire un truck apres une chaine on doit rajouter un '+' de concaténation

j'ai trouvé même le cas de #13#10 ou d'autre valeur

Code :

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

1
2
3
 
 
LibTiffDelphiVersionString = 'LibTiffDelphi 3.7.0.00'#13#10'Pre-compiled LibTiff for Delphi'#13#10'http://www.awaresystems.be/'#13#10;

sans le '+' me signale aussi une erreur, alors que les cas que j'ai vu sur le net, on ajoute toujours un '+' pour concaténer la chaine

[ShaiLeTroll]

Le + est utilisé pour concaténer des chaines, la syntaxe utilisé est-celle pour les caractères spéciaux, le + n'est pas nécessaire, en tout cas cela fonctionne depuis fort longtemps pour ce que je sais, je l'ai utilisé en D3 !

Sinon quel Delphi ? Avant ou Après 2009 ? Est-ce un problème unicode ?
La Gestion du Tiff existe en D2010

[Dr.Who]

cette syntaxe fonctionne sur n'importe quel delphi de D2 à D2010,

Edit :

aprés test, impossible de reproduire l'erreur sur D2009.

[mima_mine]

Sinon quel Delphi ? Avant ou Après 2009 ? Est-ce un problème unicode ?
La Gestion du Tiff existe en D2010

je developpe un parseur Delphi, donc faut qu'il marche avec tous les versions Delphi
et comme cette partie n'existe pas dans ma grammaire, je voulais savoir es-ce que c'est juste pour pouvoir l'ajouter

Merci pour votre aide

[Dr.Who]

oui c'est juste, aprés, libre à toi de supporter ou non certaines syntaxes propre à Delphi.
en fait, si tu ecris un parseur Pascal, tu dois surtout en premier lieu supporte complétement le Pascal.

Delphi et FPC sont basé sur Pascal mais en aucun cas ne sont LE pascal.

en gros tu as :

Code :

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

1
2
3
4
5
6
7
 
PASCAL BASE
 +-> PASCAL OBJET
 +-> TURBO PASCAL BY BORLAND 
    +-> PASCAL OBJECT DELPHI BY BORLAND
      +-> PASCAL OBJECT DELPHI BY CODEGEAR/EMBARCADERO
      +-> PASCAL OBJECT BY FPC

[mima_mine]

oui je fais un parseur Delphi, ,j'ai déja trouvé une grammaire Pascal, et je la complète avec les testes, donc a chaque fois je trouve une nouvelle syntaxe je dois dabord comprendre son sens puis l'ajouter

Merci pour votre aide

[ShaiLeTroll]

Bravo !
L'air et la manière de mal posée une Question !
Je n'avais pas titlé sur "ma Grammaire" !

Si tu avais commencé par :

Je développe un Parseur Delphi, que veut dire la syntaxe suivante, en particulier le #0 sans concaténation avec +

Code :

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

'Chaine := \StringFileInfo\%0.4x%0.4x\FileVersion'#0;

Tu commences sur Format et on part à des kilomètres, avant de te lancer dans un parseur, faudrait que tu maîtrise la syntaxe de base, car là c'est vraiement de l'ultra basique, ensuite la fonction Format c'est pas la plus rigolote ! Après tu passeras surement à la fonction Write, tu verras c'est encore plus rigolo, ça doit être l'une des rares fonctions à paramètres variables ...

[mima_mine]

Bravo !
L'air et la manière de mal posée une Question !

Oops désolé c'est ma façon de poser la question t'a énervé !!
parce que j'ai trouvé des syntaxes j'ai jamais vu (sachant que j'ai développé déja avec Delphi), donc quand j'ai vu la chaine avec le #0 et a l'intérieur de la fonction Format, j'ai cru que c'est spéciale a cette fonction

en plus n'oublie pas que ce n'est pas facile de développer un parser qui marche avec toutes les versions, donc je dois au min tester 5000 code Delphi de différente version et à chaque fois je trouve une nouvelle syntaxe je dois savoir ou je dois l'ajouter exactement

[Dr.Who]

shay à raison,

format supporte déja des paramêtres de tout type grace à sont "array of const"
(ça aussi tu dois le supporter)

write, read ou encore les fonctions avec arguments non typés, sont bien plus "marrant".

et quand tu arrivera aux surcharge d'opérateurs ce sera encore plus marrant.
puisqu'il existe deux syntaxe :
celle de FPC et celle de Delphi.

exemple FPC :

Code :

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

1
2
operator + (A: integer; B: TObject): TObject;
operator := (A: TPoint; B: TRect): TRect;

règle : doit trouver un opérateur valide aprés le mots clef "operator"

exemple Delphi :

Code :

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

1
2
3
4
5
6
7
 
type
  [identifiant] = [record/class()]
  public
    class operator Add(A: integer; B: TObject): TObject; 
    class operator Implicit(A: TPoint; B: TRect): TRect;
  end;

régle : doit trouver un opérateur "nommé" supporté aprés la combinaison de mots clef "class" et "operator" dans un contexte de type Record ou Class.

[mima_mine]

pas grave pour la surcharge parce que j'ai déja vu ça dans C++

merci pour votre aide,