MSWEBDVD - Unit???

[Khabarakh]

Du musst die Prozedur noch im interface-Abschnitt deklarieren:

Delphi-Quellcode:

unit uMSWEBDVD;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, MSWEBDVDLib_TLB;

procedure play(DVD: TMSWebDVD);

implementation

procedure play(DVD: TMSWebDVD);
begin
  DVD.DVDDirectory := 'E:\VIDEO_TS\';
  DVD.Play;
end;

end.

PS: Mit Multimedia hat das ja eigentlich nichts zu tun, eher Pascal allgemein.