Тренсфер

Так ведь IsMidletPaused это логическая функция которая принимает значение истина или ложь. Например попробуй этот код:
begin
repeat
if IsMidletPaused=true then begin
setcolor(255,255,0);
FillRect(0, 0, GetWidth, GetHeight);
Repaint;
end;
until 1=2;
end.
Если поставишь на паузу экран станет жёлтым.
Твой код можно также изменить:
if IsMidletPaused=true then begin
while IsMidletPaused=true do begin
delay(300); //Ждём пока на паузе
if (is_playing=1) then close_player; //Затем выполняем несколько действий
plp:=Playing;
Playing:=0;
Paused:=false;
end;
end;