libvlc for Delphi and FreePascal v1.1.11

paslibvlc is interface to VideoLAN libvlc.dll and Delphi / FreePascal VCL player component based on VideoLAN libvlc.dll

Work with VideoLAN 1.1.11
Tested under Windows XP 32 and 64 bit
Tested under Windows 7 64 bit
Demo compiled with Delphi 2007
Demo compiled with Free Pascal 2.4.2 (Lazarus 0.9.30)
Correctly handle Unicode FileNames

Compatible with VLC 1.1.11
Compatible with FREE PASCAL, Linux
New component: TPasLibVlcMediaList
Methods for change play list mode:

PlayerSetPlayModeNormal;
PlayerSetPlayModeLoop;
PlayerSetPlayModeRepeat;

Methods for play, stop, pause

  Play;
  Pause;
  Stop;
  Next;
  Prev;
  IsPlay(): Boolean;
  GetState(): TPasLibVlcPlayerState;
  PlayItem(item: libvlc_media_t_ptr);

Methods for operate on play list:

  Add(mrl: WideString);
  Get(index: Integer);
  Count(): Integer;
  Delete(index: Integer);
  Insert(index: Integer; mrl: WideString);

  GetItemAtIndex(index: Integer): libvlc_media_t_ptr;
  IndexOfItem(item: libvlc_media_t_ptr): Integer;

After execute any method application will be notified about it via events:

OnItemAdded - after LIBVLC add item to play list
OnWillAddItem - before LIBVLC add item to play list
OnItemDeleted - after LIBVLC del item from play list
OnWillDeleteItem - before LIBVLC del item from play list

OnNextItemSet - afer player play next item

New functions in VCL component:

SetPlayRate() - change current play rate
GetPlayRate() - return current play rate

playRate = 100 - play with normal speed
playRate = 200 - play with speed x 2
playRate = 50 - play with slow speed is 0.5

MouseEvents

onclick
ondblclick
OnMouseActivate
onmousedown
onmouseup
OnMouseMove
OnMouseEnter
OnMouseLeave