Difference between revisions of "ActiveX/Delphi"
Jump to navigation
Jump to search
m |
m (use the template) |
||
Line 1: | Line 1: | ||
− | + | {{howto| use the [[ActiveX]] control with Delphi}} | |
==Getting started== | ==Getting started== |
Revision as of 10:10, 20 January 2006
This page describes how to use the ActiveX control with Delphi. | Other "how to" pages |
Contents
Getting started
What you need
- Borland Delphi 3 or newer
- a running System with Microsoft Windows
- http://www.videolan.org/ including the ActiveX Plugin installed
Import the ActiveX-Component
- Start your Borland Delphi
- < Delphi2005: Select Components --> Import ActiveX --> VideoLan VLC ActiveX Plugin
- >= Delphi 2006: Select Components --> Import component --> Import ActiveX Control --> VideoLan VLC ActiveX Plugin
- Otherwise try creating a new package using the created AXVLC_TLB.pas
Confirm successfull installation
- You should now be able to add the TVLCPlugin from the ActiveX-Tab of your Component toolbox.
Usage
The VLC-Player Object can be found in your ActiveX-Components Tabsheet. Place one of it in your Form1, place a TButton and use the following code:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, AXVLC_TLB; type TForm1 = class(TForm) Button1: TButton; vlc: TVLCPlugin; procedure Button1Click(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; type VLCPlaylistMode = TOleEnum; const VLCPlayListInsert = $00000001; VLCPlayListReplace = $00000002; VLCPlayListAppend = $00000004; VLCPlayListGo = $00000008; VLCPlayListCheckInsert = $00000010; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin vlc.addTarget('C:\video.mpg', null, VLCPlayListInsert, 0); // you can use any MRL with parameters instead of 'c:\video.mpg' here vlc.play; end; end.