Discussion :

[Night_Wolf1619]

je viens d'installé delphi 2010
je compile mon application crée avec delphi7 avec delphi 2010

des tas d'erreurs alors qu'avec delphi 7 non

par exemple StrToint il me dit type incompatible

[philnext]

Ben il faut mettre les lignes en faute et les messages d'erreurs sinon...
Sachant que la plupart des erreurs viennent du changement de format des string passées en Unicode, une base : http://edn.embarcadero.com/article/38980

[tourlourou]

N'y aurait-il pas eu passage à l'Unicode entre les 2 ? A revoir tous les problèmes de compatibilité AnsiChar/WideChar, AnsiString/WideString, etc.

[Night_Wolf1619]

le document et en anglais je comprend pas bien
y a pas un autre en français

[Paul TOTH]

le document et en anglais je comprend pas bien
y a pas un autre en français

le problème principal que tu vas rencontré est que le type "string" est devenu par défaut une "UnicodeString", l'ancien type string est l'AnsiString voir la RawByteString si elle contient des données binaires et non du texte. Idem pour PChar devenu PWideChar au lieu de PAnsiChar

Sachant cela, tu dois soit adapter ton code pour passer en Unicode en changer le type de tes variables pour forcer l'ANSI...mais ils s'avère généralement plus simple de basculer en Unicode, ce qui implique une attention particulière à tout ce qui est entrées/sorties vers des Socket, des fichiers, ... si l'application D7 a stocké une chaîne dans un fichier, c'est forcément de l'ANSI et il faut la lire comme tel.

[Night_Wolf1619]

le problème principal que tu vas rencontré est que le type "string" est devenu par défaut une "UnicodeString", l'ancien type string est l'AnsiString voir la RawByteString si elle contient des données binaires et non du texte. Idem pour PChar devenu PWideChar au lieu de PAnsiChar

Sachant cela, tu dois soit adapter ton code pour passer en Unicode en changer le type de tes variables pour forcer l'ANSI...mais ils s'avère généralement plus simple de basculer en Unicode, ce qui implique une attention particulière à tout ce qui est entrées/sorties vers des Socket, des fichiers, ... si l'application D7 a stocké une chaîne dans un fichier, c'est forcément de l'ANSI et il faut la lire comme tel.

je suis un peut confuse est ce que la version 2010 et bonne

justement la première erreur et quand je stocké une chaîne dans un fichier

Code :

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

1
2
3
4
Append(NW_SIDS); {Opens the file for editing}
Writeln(NW_SIDS,MainProgram.name+':'+inttostr(MainProgram.SID_pid)+':'+inttostr(MainProgram.tp_id)
 +':'+inttostr(MainProgram.PMT_pid)+':'+MainForm.CA_SYSTEMS.Cells[1,Active_ROW]+':'+MainForm.CA_SYSTEMS.Cells[0,Active_ROW]+':'+MainForm.CA_SYSTEMS.Cells[3,Active_ROW]+':;');
Closefile(NW_SIDS); {Closes file NW_SIDS}

il ce pointe sur StrToint dans la 2eme line et me dit type incompatible

[Moez.B]

salut,
quel est le type de PMT_ID ?

[Night_Wolf1619]

salut,
quel est le type de PMT_ID ?

Word

[Moez.B]

Béhh , il faut basculer vers l'UNICODE surtout dans l'insertion dans un fichier tel est ton cas ..
Et si tu essaies une conversion de cette façon :

Code :

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

1
2
 
AnsiString(IntToStr(MainProgram.PMT_pid))

Tu garanties que la chaîne insérée est de type AnsiString ... si ça fonctionnes, termine le boulot pour le reste des insertions ..

[Night_Wolf1619]

Béhh , il faut basculer vers l'UNICODE surtout dans l'insertion dans un fichier tel est ton cas ..
Et si tu essaies une conversion de cette façon :

Code :

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

1
2
 
AnsiString(IntToStr(MainProgram.PMT_pid))

Tu garanties que la chaîne insérée est de type AnsiString ... si ça fonctionnes, termine le boulot pour le reste des insertions ..

toujours la même erreur

[Night_Wolf1619]

après plusieurs teste j'ai corrigé l'erreur été avant pas après le curseur
dans MainProgram.name

j'ai fait comme ça remplacé tout les MainProgram.name par AnsiString(MainProgram.name) et plus d'erreur

et la déclaration de MainProgram et comme ca

Code :

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

1
2
  TProgramm82 = record
    Name:          array[00..29] of char;

et dans var

Code :

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

1
2
var
  MainProgram          : TProgramm82;

maintenant j'ai le problème suivant

Code :

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

MainForm.CA_Channel.Cells[1,1]:=MainProgram.Name;

il affiche des petite carreaux a la place du nom

même chose avec AnsiString(MainProgram.name)

[Moez.B]

Salut , béh , j'estime que c'est une StringGrid: même chose, le composant stockant des strings doit être redéfini .. pas facile la migration !

[Night_Wolf1619]

Salut , béh , j'estime que c'est une StringGrid: même chose, le composant stockant des strings doit être redéfini .. pas facile la migration !

oui c'est un StringGrid mais j'ai testé et testé rien il n'affiche pas que des petite carreaux par contre quand c' un nombre la il affiche

[Paul TOTH]

comme expliqué plus haut tu dois faire la conversion ANSI/UNICODE en lecture et en écriture de tes fichiers

exemple

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
 
var
  str: AnsiString;
begin
  str :=  MainProgram.Name; // conversion Unicode vers Ansi
  WriteLn(NW_SIDS, Str, ....);
end;
 
// en lecture
 
var
  str: AnsiString;
begin
  ReadLn(NW_SIDS, Str, ....);
  MainProgram.Name := Str; // conversion Ansi vers Unicode
end;

sauf si tu désires convertir le fichier en Unicode évidemment, mais tu as probablement besoin de relire des fichiers qui ont été créés en ANSI avec Delphi 7

[Night_Wolf1619]

oui mais pour la StringGrid ça ne marche pas

[Paul TOTH]

oui mais pour la StringGrid ça ne marche pas

as-tu vérifié le contenu des tes fichiers ? s'il contiennent de l'ANSI que tu lis en Unicode ou inversement, la StringGrid (Unicode) ne risque pas d'afficher une information cohérente.