Transtypage : String (ou Integer) en Pchar

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 !

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...


-------------------------------
Réponse au message :
-------------------------------

> 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 !

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 ?


-------------------------------
Réponse au message :
-------------------------------

> 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...
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > 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 !
>

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...


-------------------------------
Réponse au message :
-------------------------------

>
> 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 ?
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > 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...
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > 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 !
> >
>

Merci!!!
Bloom1
www.vbquebec.comjeux-en-flash
coolsalex666@hotmail.com

Mirde ca bogué :S