Показать сообщение отдельно
  #2  
Старый 23.04.2010, 05:20
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Таймер так и добавляется, как и любой др. компонент:
Код:
var
  Timer : TTimer;
begin
  Timer := TTimer.Create(Nil);
  Timer.Interval := 5000;
  Timer.OnTimer := MyOnTimerEventHandler; // тип procedure (Sender : TObject)
  Timer.Enabled := True;
end;

А для медиаплеера поищи в инете пример написания такового через DirectX - там достаточно порядка 20 строчек кода. И не надо будет тащить за собой весь VCL.
Ответить с цитированием