Home » Tipps & Tricks » Multimedia » Sonstiges » TAnimate verwenden

TAnimate verwenden

Wie kann ich bei TAnimate das Avi einstellen, dass im Internet Explorer beim Downloadangezeigt wird?Lösung: Das Avi ist in der Datei ’shdocvw.dll‘ und hat die ID ‚256‘.

procedure TForm1.Button1Click(Sender: TObject);
begin
  try {da Reshandel nicht gesetzt ist, ensteht ein Fehler}
    Animate1.ResID := 256;
  except
  end;
  Animate1.ResHandle := LoadLibrary('shdocvw.dll');
  Animate1.Active := True;
end;