procedure TForm2.oxGraphicButton11Click(Sender: TObject);
begin try
play_snd(1);
if media_file_list.Count=0 then exit;
if minfo_list.ItemIndex=0 then exit;
if minfo_list.ItemIndex=-1 then begin
   minfo_list.ItemIndex:=0;
   minfo_listClick(Sender);
   exit;
end;
minfo_list.ItemIndex:=minfo_list.ItemIndex-1;
minfo_listClick(Sender);
except
on E : Exception do _log_entry_error(E.ClassName,E.Message,'C70000');
end;End;