TMediaPlayer. Убрать рамку вокруг кнопок

[kropotkina-alice]

Сообщение от grominfo

Не нравится. Составит. Не нашел где она там рисуется. Подскажите, пожалуйста. Разделители между кнопками убрал, а где рисуется рамка - не нашел.

Заблокируйте procedure TMediaPlayer.Paint;
Ну, то есть, закомментируйте все операторы внутри неё...

ЗюЗю
Ой, ошиблась!
Надо закомментировать в ней только строку

Rectangle(0, 0, Width, Height);

Сообщение от grominfo

И как можно изменить расстояние между кнопками?

Изменением ширины компонента TMediaPlayer

ЗюЗюЗю
Опытным путём выяснилось, что копировать файл MPlayer.dcu в каталог Delphi7\LIB совершенно необязательно - компилятор "подцепляет" близлежащий, то есть тот файл MPlayer.dcu, который лежит в каталоге вашего проекта...

[grominfo]

Сообщение от kropotkina-alice

Заблокируйте procedure TMediaPlayer.Paint;
Ну, то есть, закомментируйте все операторы внутри неё...

ЗюЗю
Ой, ошиблась!
Надо закомментировать в ней только строку

Rectangle(0, 0, Width, Height);

Изменением ширины компонента TMediaPlayer

ЗюЗюЗю
Опытным путём выяснилось, что копировать файл MPlayer.dcu в каталог Delphi7\LIB совершенно необязательно - компилятор "подцепляет" близлежащий, то есть тот файл MPlayer.dcu, который лежит в каталоге вашего проекта...

Спасибо, дорогая Алиса. Чтобы я без тебя делал. Только если закомментить всю процедуру, кнопки вообще не отрисовываются. Я закомментил только

Rectangle(0, 0, Width, Height);

и рамка исчезла

[Аватар]

Аватар, ваш метод почему-то не сработал.

Да, тупанул и не сработает. Вариант еще есть - Visible=False для плейера, наделать своих красивых кнопок и прицепить к ним методы плейера, начиная с Play. Можно и TrackBar или ProgressBar прицепить, в таймере используя Position плейера. Enabled кнопок придется самому управлять

[grominfo]

Изменением ширины компонента TMediaPlayer

Не, так не получилось. Я поменял значения в процедуре отрисовки кнопок

Опытным путём выяснилось, что копировать файл MPlayer.dcu в каталог Delphi7\LIB совершенно необязательно - компилятор "подцепляет" близлежащий, то есть тот файл MPlayer.dcu, который лежит в каталоге вашего проекта...

Да, тоже заметил, когда забыл скопировать файл и сразу запустил проект.

Вариант еще есть - Visible=False для плейера, наделать своих красивых кнопок и прицепить к ним методы плейера, начиная с Play.

Этот вариант не подходит, я еще в первом посте написал. К компоненту просто уже многое привязано, в том числе и управление кнопками. То есть, на базе этого компонента уже написан компонент-обертка, и все переделывать не охота. Клиент все равно не доплатит ))))

Можно и TrackBar или ProgressBar прицепить, в таймере используя Position плейера.

Это уже сделано.

В общем, большое спасибо! Все получилось почти так как надо!