Проблемы с Windows Media Player 9 OCX. [D7, Win2k]
Zelius © (2004-07-14 18:09:00)
Хочу добавить Windows Media Player 9 OCX в свою программу,
кинул на форму, поставил Align = alTop, в дизайн-режиме, контрол
изменяет свои размеры, но в ран-тайм режиме не хочет их менять,
застывает на размерах, которые были при запуске программы.
Кто-нибудь сталкивался с таким поведением? Спасибо.
Zelius (2004-07-16 15:43:00) [1]
Если кому интересно, то я нашел решение:
procedure TForm1.FormResize(Sender: TObject);
var
Res: Integer;
begin
with WindowsMediaPlayer1 do
begin
Res := (IDispatch(OleObject) as
IOleInPlaceObject).SetObjectRects( BoundsRect, Rect(0, 0, 32767,
32767));
end;
end;
Наверх 
ЧАТ |
Орешник |
|
