Delphi 2010 - Incompatibles types 'char' and 'AnsiChar'

En Delphi7 Ce code ça Marche très bien

Code:

---

1 2 3 4 5 6

procedure TForm1.Button1Click(Sender: TObject); Var x:string; Begin x:='COMMAND.COM /C attrib -s -h '+'C:\Test'; winexec(pchar(x),0); end;

---

Mais en Delphi 2010 s’affiche l’erreur suivant dans l’instruction winexec(pchar(x),0); :

Citation:

---

E2010 Incompatibles types 'char' and 'AnsiChar''

---

Solution SVP

Code:

---

1 2 3 4 5 6

procedure TForm1.Button1Click(Sender: TObject); Var x:ansistring; Begin x:='COMMAND.COM /C attrib -s -h '+'C:\Test'; winexec(pansichar(x),0); end;

---

depuis le support unicode le type string n'est plus en 8bits, il faut utiliser ansistring si tu en as besoin

Mercccccccccccci ça marche:bravo: