🚀 go-pugleaf

Thanks Yoto,

I'll try your approach below:

> Here's how your code may look like:
>
>   String FileName(WinDir);
>   FileName += "\\media\\jungle asterisk.wav";
>   PlaySound(FileName.c_str(), NULL, SND_ASYNC | SND_FILENAME);
>
> Note that your code assumes that this file exists.  However, on most
> systems (including mine), this file is not available.  A more correct
> approach is to use the user's default sounds such "SystemExclamation",
> "SystemQuestion", "SystemHand", etc:
>
>   PlaySound("SystemExclamation", NULL, SND_ASYNC | SND_ALIAS);

Yes, your point is well taken.  This silly application was intended to
gain/teach a little bit about playing wave files.  I calle it "wave harp."
It is an annoying little work that plays 64 noises in the Win98 media file
as you move the mouse around the window.

>   http://www.bcbdev.com/faqs/faq54.htm

Based on your previous recommendation, I independently came up with:

    // Fetch the windows directory
    char WinDir[MAX_PATH];

    __fastcall TForm1::TForm1(TComponent* Owner)
            : TForm(Owner)
    {
       WinDir[MAX_PATH] = '\0';
       GetWindowsDirectory(WinDir,MAX_PATH);
       Form1->Edit1->Text = MAX_PATH;  // from which I see that MAX_PATH =
260
    }

I then go through a MouseOver event handler with 64 statements similar to
this:

        if (X == 10) PlaySound(strcat(WinDir,"\\media\\jungle
asterisk.wav"), "", SND_ASYNC);

This also works, though I realize that WinDir just keeps growing in size, so
it plays the first sound, the paths for the remaining sounds are too long
and are therefore ignored, and I get an error very soon because WinDir has
grown larger than 260.  I was looking for a simple way to concatenate the
path and file names.  I guess it will simply take a few lines to do so.  I
guess there's not much point in avoiding pasting all these lines in 64
times.  I understand these other problems and can find a way to work around
them.

Cheers,
Nick