Программа отличная. Автор молодец!
Несколько замечаний:
1. При попытке открыть *.flv файл выводит сообщение об ошибке
"Не удаётся воспроизвести файл. Формат не поддерживается. ($80040265)
2. При попытке прокрутить некоторые DVD фильмы ( *.VOB ) выводит сообщение об ошибке
"Division by zero"
Предложения по доработке:
1. При двойном щелчке левой кнопкой мыши на иконке восстанавливать окно программы ( а то лень жать правой а потом выбирать пункт меню "восстановить" )
2. Стоит добавить возможность скрывать иконки на рабочем столе, чтобы можно было нормально смотреть видео.
Делается это легко:
Код:
// скрыть
ShowWindow(GetWindow(FindWindow('ProgMan', nil), GW_CHILD), SW_HIDE);
// показать
ShowWindow(GetWindow(FindWindow('ProgMan', nil), GW_CHILD), SW_SHOW)
3. Сделать прилипание формы к краям экрана ( В D7 делается с помощь свойств формы ScreenSnap и SnapBuffer )