Probleme avec Speech

Bonjour
J'utilise Speech pour faire parler l'ordinateur il me reste cependant un probleme je n'arrive pas a convertir un tableau au format Delphi

Code:

---

1 2 3 4 5 6 7 8 9 10 11

procedure TForm1.SpVoice1Phoneme(Sender: TObject; StreamNumber: Integer; StreamPosition: OleVariant; Duration: Integer; NextPhoneId: Smallint; Feature: TOleEnum; CurrentPhoneId: Smallint);   const Phonetic: array[1..49] of String=( '-','!','&',',','.','?','_','1','2','aa','ae','ah','ao','aw', 'ax','ay','b','ch','d','dh','eh','er','ey','f','g','h','ih','iy', 'jh','k','l','m','n','ng','ow','oy','p','r','s','sh','t','th', 'uh','uw','v','w','y','z','zh');   //Cela correspond à la phonétique de la langue anglaise // (voir l'aide de Microsoft Speech API à "phoneme")

---

J'ai trouve ceci plus d'erreur de compilation mais je ne sais pas si cela peut convenir

Code:

---

1 2 3 4 5 6

String Phonetic[]={ "-","!","&",",",".","?","_","1","2","aa","ae","ah","ao","aw", "ax","ay","b","ch","d","dh","eh","er","ey","f","g","h","ih","iy", "jh","k","l","m","n","ng","ow","oy","p","r","s","sh","t","th", "uh","uw","v","w","y","z","zh"};

---