Mpg abspielen

[Basic-Master]

versuch mal

Delphi-Quellcode:

var eDC:HDC;
    eCanvas:TCanvas;
begin
eDC := GetDC(Panel1.Handle);
eCanvas := TCanvas.Create;
eCanvas.Handle := eDC;
eCanvas.Brush.Color := clblack;
eCanvas.Pen.Color := clblack;
eCanvas.FillRect(Rect(0,0, panel1.Width, panel1.Height));