cubano100pct
Programmer
I imported into Delphi 5 the Apple Quick Time Control version 2.0. I then
created a new application and put the QuickTime Control in the form and the
OpenDialog VCL component and a button.
I added the following code:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
MessageDlg('Displaying: ' + OpenDialog1.FileName, mtInformation ,
[mbOk], 0);
QTActiveXPlugin1.SetMovieName(PWideChar(OpenDialog1.FileName));
QTActiveXPlugin1.Play;
end;
end;
I also tried PChar first. Both methods give me the same error: OLE error
FFFFFFCE.
Help please?
Plus does anyone know where I can find documentation on the methods and
properties for the QuickTime control?
--
--
Fair Bits...
Félix
created a new application and put the QuickTime Control in the form and the
OpenDialog VCL component and a button.
I added the following code:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
MessageDlg('Displaying: ' + OpenDialog1.FileName, mtInformation ,
[mbOk], 0);
QTActiveXPlugin1.SetMovieName(PWideChar(OpenDialog1.FileName));
QTActiveXPlugin1.Play;
end;
end;
I also tried PChar first. Both methods give me the same error: OLE error
FFFFFFCE.
Help please?
Plus does anyone know where I can find documentation on the methods and
properties for the QuickTime control?
--
--
Fair Bits...
Félix