Zitat von
Wunni:
zum Beispiel so?
Delphi-Quellcode:
try
Animate1.ResID := 256;
Animate1.ResHandle := LoadLibrary('shdocvw.dll');
Animate1.Active := True;
except end;
oder in Deinem Fall:
Delphi-Quellcode:
try
InfoFensterForm.Animate.ResHandle := HInstance;
InfoFensterForm.Animate.ResId := 10;
InfoFensterForm.Animate.Active := true;
except end;
Das ist nur die Fehlerbehandlung.
Die brauch ich (erstmal) nicht, denn so würd ich halt keinen Fehler mitbekommen - aber das Video wird trotzdem nicht geladen
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<