Transtypage : String (ou Integer) en PcharFermé

Question

Salut !

Ben voilà tout est dans le titre :)

En fait, je souhaite que lorsqu'on clique sur une listbox, un son portant le nom du numéro de l'item sélectionné soit joué.
Un peu comme ça :

procedure TForm1.ListBox1Click(Sender: TObject);
begin
sndPlaySound('C:\mon_dossier\'+ pchar((IntToStr(ListBox1.ItemIndex)) +'.wav', SND_NOSTOP or SND_ASYNC)
end;

Lors de la compilation :

')' attendu(e) mais ',' touvé(e)

sur cette ligne bien sûr :

sndPlaySound('C:\mon_dossier\'+ pchar((IntToStr(ListBox1.ItemIndex)) +'.wav', SND_NOSTOP or SND_ASYNC)

Ca fait un tit moment que je cherche, si quelqu'un peu m'aider.

Merci !

Emandhal · Answer

sndPlaySound('C:\mon_dossier\'+ pchar(IntToStr(ListBox1.ItemIndex)) +'.wav', SND_NOSTOP or SND_ASYNC)

tu as oublié de fermer une parenthese... ou il y en a une de trop après le mot PChar

Tout problème a sa solution... Mais en général, c'est jamais la bonne...

pyroflo · Answer

Merci dem e répondre j'avais pa vu fiouuuu je dois être fatigué...

Mais maintenant on me dit que String et PAnsiChar sont incompatibles donc apparemment Pchar() ne marche pas non ?

Emandhal · Answer

kan il te dit PChar c toute la string et non pas ke 1 bout donc normalement il faut mettre :

sndPlaySound(pchar('C:\mon_dossier\'+ IntToStr(ListBox1.ItemIndex) +'.wav'), SND_NOSTOP or SND_ASYNC)

Tout problème a sa solution... Mais en général, c'est jamais la bonne...

cs_bloom1 · Answer

Merci!!!
Bloom1  :big)  :question) 
www.vbquebec.comjeux-en-flash
[mailto:coolsalex666@hotmail.com coolsalex666@hotmail.com]

cs_bloom1 · Answer

Mirde ca bogu&#233; :S

Transtypage : String (ou Integer) en Pchar

5 réponses

Discussions similaires