Сообщение от cherepets
на панельке сверху есть кнопочка help.
а вообще вот код (не проверял, писал сразу сюда):
program shit;
begin
repeat until geykeypressed=KE_KEY1;
if not openplayer('/shit.mid', 'audio/midi') then halt;
if not setplayercount(-1) then halt;
if not startplayer then halt;
repeat until geykeypressed=KE_KEY2;
end.
|
Не заработает.
1. Функции "geykeypressed нету"
2. Ты не закрываешь repeat
3. Внезапный 2й repeat