Discussion :

[looping]

bonjour,

je travaille actuellement sur une appli en Delphi 2007.

J'ai essayé de la compiler chez un collègue qui possède Delphi XE afin de voir ce que cela donnait au niveau migration unicode.

Et finalement il n'y a que 4 erreurs qui se répetent tout au long du code.
Voir fichier joint

Je voulais savoir à la vue de ces erreurs , si je peux déja les anticiper en Delphi 2007.
Si ce n'est pas possible, quelles seront les actions correctives à faire en XE pour les erreur W1057 et W1058.

cordialement

[Andnotor]

Ce ne sont déjà que des avertissements et non des erreurs

1. Je dirais que tu forces l'utilisation d'une version A d'un fonction. Donc appeler LaFonction (ou éventuellement W) plutôt que LaFonctionA devrait suffire.
2. Les formats sont maintenant regroupés dans un record qui permet une localisation plus aisée. Dans D2007, tu peux déjà déclarer une variable de type TFormatSettings et l'utiliser avec les routines de conversion. Ce que je te conseille de toute façon de faire s'il y a lecture/écriture dans des fichiers.
3. Tu as un test du style c in ['a','b'] où "c" ne peut être qu'ANSI. Avec CharInSet, c peut être indifféremment ANSI ou Unicode. Je ne sais pas si cette fonction existait déjà sous D2007.
4. L'inverse du point 1.

A part le point 3, ces messages ne sont pas propres à l'Unicode.

[Cl@udius]

... Avec CharInSet, c peut être indifféremment ANSI ou Unicode. Je ne sais pas si cette fonction existait déjà sous D2007.

Pour info, cette fonction est apparue avec D2009, première version gérant l'Unicode.

[ShaiLeTroll]

Evite le type AnsiString si le peux !
Evite le PAnsiChar avec les API Windows qui existe en variant Ansi et Wide
Si tu as la volonté de passer de Unicode vers Ansi, il te suffit de faire un transtypage explicite genre

MaChaineAnsi := MonEdit.Text; devient MaChaineAnsi := AnsiString(MonEdit.Text);.
MaChaineCourte := MonEdit.Text; devient MaChaineCourte := ShortString(MonEdit.Text);.

Cela va retirer les Warnings car tu indiques au compilateur la volonté de le faire !
Attention, cette pratique est réservée uniquement si tu as besoin de convertir, le type String doit être le type chaine majoritairement utilisé,
AnsiString pour compatibilité ou pour des API tiers utilisant du PAnsiChar et
ShortString si tu l'utilises dans des fichiers type "file of record"


Pour DecimalSeparator, facile suffit de changer de variable globale, est-ce que FormatSettings existait déjà en 2007, il suffit d'écrire ceci

Code :

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

{$IFDEF VER220}FormatSettings.{$ENDIF}DecimalSeparator := ...

VER220 c'est XE
en utilisant les variables Indy de IdCompilerDefines.inc, c'est plus simple pour gérer le "version >= vvv"

Code :

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

{$IFDEF VCL_XE_OR_ABOVE}FormatSettings.{$ENDIF}DecimalSeparator := ...

[Andnotor]

Une petite remarque encore sur string/ansistring qui pourrait aussi être une cause du message de conversion : avoir une variable chaîne de taille fixe déclarée sous la forme string[N] revient à déclarer une chaîne de N ansichar, y compris sur XE3

Sous D2009 et suivant, string[3] n'est pas égal à array[1..3] of char contrairement aux versions antérieures (sans tenir compte du byte de longueur bien sûr).