moze znacie tytul takiej nutki, co tam lecialo:
"pamietam... nie zapomne... czesto sie topie w oceanie wspomnien..."
pls o help!! na google nic takego ni ma:/
moze znacie tytul takiej nutki, co tam lecialo:
"pamietam... nie zapomne... czesto sie topie w oceanie wspomnien..."
pls o help!! na google nic takego ni ma:/
Heh, to jak juz mowa o nutkach to moze ktos zna tytul i wykonawce piosenki w ktorej znajduja sie nastepujace slowa:
can't stop can't stop can't stop the beat, won't stop won't stop won't stop the beat, can't move can't move ..... ble ble i tak dalej...
do drugiego posta: Lyrics, "You Can't Stop The Beat"
Wpisz w Googlach te słówka to znajdziesz...
To może ktoś wie jak odegrać np 1 lub 2 lub 3 dzwięki z pliku midi??
Żeby zagrać kilka nut trzeba (uses MMSystem)
//otwierani portu midi
case midiOutOpen(@hmo, MIDIMAPPER, 0, 0, 0) of
//case midiOutOpen(@hmo, 0, 0, 0, 0) of
MMSYSERR_NOERROR: showmessage('port midi out jest otwarty!!');
MIDIERR_NODEVICE: showmessage('No MIDI port was found. This error occurs only when the mapper is opened');
MMSYSERR_ALLOCATED: showmessage('The specified resource is already allocated.');
MMSYSERR_BADDEVICEID: showmessage('The specified device identifier is out of range.');
MMSYSERR_INVALPARAM: showmessage('The specified pointer or structure is invalid.');
MMSYSERR_NOMEM: showmessage('The system is unable to allocate or lock memory.');
end;
//wysłanie komunikatu żeby zagrał - 9, na kanale - 5, nutę - 3C, z siłą - 7F
dwMSG:=StrToInt('0x007F3C95');
case midiOutShortMsg(hmo,dwMSG) of
MMSYSERR_NOERROR: showmessage('jest ok');
MIDIERR_BADOPENMODE: showmessage('midiOutMsg - MIDIERR_BADOPENMODE');
MIDIERR_NOTREADY: showmessage('midiOutMsg - MIDIERR_NOTREADY');
MMSYSERR_INVALHANDLE: showmessage('midiOutMsg - MMSYSERR_INVALHANDLE');
end;
Teraz wiesz jak zagrać nutkę, wystarczy wyciągnąć z pliku odpowiednie nuty (komunikaty midi) odpowiednio połączyć z problemem czasu i gotowe