diff --git a/components/jvcllaz/packages/JvCoreLazD.lpk b/components/jvcllaz/packages/JvCoreLazD.lpk
index a9cdab8be..dcc5689b0 100644
--- a/components/jvcllaz/packages/JvCoreLazD.lpk
+++ b/components/jvcllaz/packages/JvCoreLazD.lpk
@@ -16,7 +16,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvCoreLazR.lpk b/components/jvcllaz/packages/JvCoreLazR.lpk
index e02eac654..037ded4b4 100644
--- a/components/jvcllaz/packages/JvCoreLazR.lpk
+++ b/components/jvcllaz/packages/JvCoreLazR.lpk
@@ -22,7 +22,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvCtrlsLazD.lpk b/components/jvcllaz/packages/JvCtrlsLazD.lpk
index 87ec1b315..e530ccbea 100644
--- a/components/jvcllaz/packages/JvCtrlsLazD.lpk
+++ b/components/jvcllaz/packages/JvCtrlsLazD.lpk
@@ -20,7 +20,7 @@
- Labels
- Listboxes, Comboboxes, TreeViews"/>
-
+
diff --git a/components/jvcllaz/packages/JvCtrlsLazR.lpk b/components/jvcllaz/packages/JvCtrlsLazR.lpk
index 8dd7b7ddd..8f51ee1d8 100644
--- a/components/jvcllaz/packages/JvCtrlsLazR.lpk
+++ b/components/jvcllaz/packages/JvCtrlsLazR.lpk
@@ -18,7 +18,7 @@
- Labels
- Listboxes, Comboboxes, TreeViews"/>
-
+
diff --git a/components/jvcllaz/packages/JvDBLazD.lpk b/components/jvcllaz/packages/JvDBLazD.lpk
index 9531ead0a..05241fd02 100644
--- a/components/jvcllaz/packages/JvDBLazD.lpk
+++ b/components/jvcllaz/packages/JvDBLazD.lpk
@@ -16,7 +16,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvDBLazR.lpk b/components/jvcllaz/packages/JvDBLazR.lpk
index 57b0b019a..bee7953ae 100644
--- a/components/jvcllaz/packages/JvDBLazR.lpk
+++ b/components/jvcllaz/packages/JvDBLazR.lpk
@@ -15,7 +15,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvPageCompsD.lpk b/components/jvcllaz/packages/JvPageCompsD.lpk
index 56a77be49..827564d75 100644
--- a/components/jvcllaz/packages/JvPageCompsD.lpk
+++ b/components/jvcllaz/packages/JvPageCompsD.lpk
@@ -15,7 +15,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvPageCompsR.lpk b/components/jvcllaz/packages/JvPageCompsR.lpk
index 30b317fdc..522269abf 100644
--- a/components/jvcllaz/packages/JvPageCompsR.lpk
+++ b/components/jvcllaz/packages/JvPageCompsR.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvStdCtrlsLazD.lpk b/components/jvcllaz/packages/JvStdCtrlsLazD.lpk
index b60677da0..242770a83 100644
--- a/components/jvcllaz/packages/JvStdCtrlsLazD.lpk
+++ b/components/jvcllaz/packages/JvStdCtrlsLazD.lpk
@@ -15,7 +15,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvStdCtrlsLazR.lpk b/components/jvcllaz/packages/JvStdCtrlsLazR.lpk
index 01e1e5062..8cea008b4 100644
--- a/components/jvcllaz/packages/JvStdCtrlsLazR.lpk
+++ b/components/jvcllaz/packages/JvStdCtrlsLazR.lpk
@@ -18,7 +18,7 @@
- Labels
- Listboxes, Comboboxes, TreeViews"/>
-
+
diff --git a/components/jvcllaz/packages/JvValidatorsLazD.lpk b/components/jvcllaz/packages/JvValidatorsLazD.lpk
index a64a0bd1c..a66472a26 100644
--- a/components/jvcllaz/packages/JvValidatorsLazD.lpk
+++ b/components/jvcllaz/packages/JvValidatorsLazD.lpk
@@ -16,7 +16,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvValidatorsLazR.lpk b/components/jvcllaz/packages/JvValidatorsLazR.lpk
index c2b2c7417..fc2f6c0c8 100644
--- a/components/jvcllaz/packages/JvValidatorsLazR.lpk
+++ b/components/jvcllaz/packages/JvValidatorsLazR.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvXPCtrlsLazD.lpk b/components/jvcllaz/packages/JvXPCtrlsLazD.lpk
index 8ecf0491a..cc29e7688 100644
--- a/components/jvcllaz/packages/JvXPCtrlsLazD.lpk
+++ b/components/jvcllaz/packages/JvXPCtrlsLazD.lpk
@@ -15,7 +15,7 @@
-
+
diff --git a/components/jvcllaz/packages/JvXPCtrlsLazR.lpk b/components/jvcllaz/packages/JvXPCtrlsLazR.lpk
index 77eedbc4d..161489b7b 100644
--- a/components/jvcllaz/packages/JvXPCtrlsLazR.lpk
+++ b/components/jvcllaz/packages/JvXPCtrlsLazR.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/jvcllaz/packages/jvruntimedesignlazd.lpk b/components/jvcllaz/packages/jvruntimedesignlazd.lpk
index e30c453f3..32329123a 100644
--- a/components/jvcllaz/packages/jvruntimedesignlazd.lpk
+++ b/components/jvcllaz/packages/jvruntimedesignlazd.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/jvcllaz/packages/jvruntimedesignlazr.lpk b/components/jvcllaz/packages/jvruntimedesignlazr.lpk
index 5f9fecabe..99ce0a2cb 100644
--- a/components/jvcllaz/packages/jvruntimedesignlazr.lpk
+++ b/components/jvcllaz/packages/jvruntimedesignlazr.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/jvcllaz/run/JvCore/JvJVCLUtils.pas b/components/jvcllaz/run/JvCore/JvJVCLUtils.pas
index d1c2a9b1d..40c00db0a 100644
--- a/components/jvcllaz/run/JvCore/JvJVCLUtils.pas
+++ b/components/jvcllaz/run/JvCore/JvJVCLUtils.pas
@@ -2054,11 +2054,7 @@ begin
begin
Brush.Color := clWhite;
FillRect(Rect(0, 0, Images.Width, Images.Height));
- {$IFDEF MSWINDOWS}
- ImageList_Draw(Images.Handle, Index, Handle, 0, 0, ILD_MASK);
- {$ELSE}
- Images.GetBitmap(Index, Bmp, gdeDisabled); // to do: test this
- {$ENDIF}
+ Images.GetBitmap(Index, Bmp, gdeDisabled);
end;
Bmp.Monochrome := True;
if DrawHighlight then
diff --git a/components/lazbarcodes/packages/lazbarcodes.lpk b/components/lazbarcodes/packages/lazbarcodes.lpk
index 4bd4c966e..e9420f670 100644
--- a/components/lazbarcodes/packages/lazbarcodes.lpk
+++ b/components/lazbarcodes/packages/lazbarcodes.lpk
@@ -1,25 +1,20 @@
-
+
+
-
+
-
-
-
-
-
-
-
+
@@ -27,7 +22,6 @@
-
@@ -46,5 +40,8 @@
+
+ <_ExternHelp Items="Count"/>
+
diff --git a/components/lazbarcodes/packages/lazbarcodes_runtimeonly.lpk b/components/lazbarcodes/packages/lazbarcodes_runtimeonly.lpk
index 948eb11ca..20c969568 100644
--- a/components/lazbarcodes/packages/lazbarcodes_runtimeonly.lpk
+++ b/components/lazbarcodes/packages/lazbarcodes_runtimeonly.lpk
@@ -14,7 +14,7 @@
-
+
diff --git a/components/vlc/README.txt b/components/vlc/README.txt
deleted file mode 100644
index 8bc01012d..000000000
--- a/components/vlc/README.txt
+++ /dev/null
@@ -1,18 +0,0 @@
-
-This component is a video player based on the VLC libraries.
-You need the VLC library headers in FPC, so this will only compile with FPC
-2.7.1 and higher.
-
-The component works on Windows and Linux with GTK2.
-It should work with QT, but this is untested.
-
-The test directory contains a sample project that shows minimal use of the
-component.
-
-There are actually 2 components:
-TLCLVLCPLayer
-and
-TVLCMediaListPlayer
-The former plays 1 video file. The second can be used to create a playlist
-and uses a TLCLVLCPLayer to play the media.
-
diff --git a/components/vlc/lazvlc.lpk b/components/vlc/lazvlc.lpk
deleted file mode 100644
index 7ec4105ac..000000000
--- a/components/vlc/lazvlc.lpk
+++ /dev/null
@@ -1,60 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/components/vlc/lazvlc.pas b/components/vlc/lazvlc.pas
deleted file mode 100644
index 3c730ef7b..000000000
--- a/components/vlc/lazvlc.pas
+++ /dev/null
@@ -1,22 +0,0 @@
-{ This file was automatically created by Lazarus. Do not edit!
- This source is only used to compile and install the package.
- }
-
-unit lazvlc;
-
-{$warn 5023 off : no warning about unused units}
-interface
-
-uses
- reglazvlc, lclvlc, LazarusPackageIntf;
-
-implementation
-
-procedure Register;
-begin
- RegisterUnit('reglazvlc', @reglazvlc.Register);
-end;
-
-initialization
- RegisterPackage('lazvlc', @Register);
-end.
diff --git a/components/vlc/lazvlc.res b/components/vlc/lazvlc.res
deleted file mode 100644
index a12114928..000000000
--- a/components/vlc/lazvlc.res
+++ /dev/null
@@ -1,113 +0,0 @@
-LazarusResources.Add('tlclvlcplayer','PNG',[
- #137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
- +#0#0#0#6'bKGD'#0#255#0#255#0#255#160#189#167#147#0#0#0#9'pHYs'#0#0#0'H'#0#0#0
- +'H'#0'F'#201'k>'#0#0#4#210'IDAT8'#203']'#145']o\W'#21#134#159#181#247'>_sf'#224#3#8#30'@-'#145#197#201#201#195#133#235'G'
- +#170':~q'#152#30#182#238#223#254#30'8T'#19#146#255#238'{'#221#8'@L"xA'#169
- +#151#3#1#156#27#12#6#219'7w./O'#214'n'#172'=>9'#188'?'#235#177#210'@'#26#223
- +'j'#21#0#158#160#16'op'#16'@@)'#253#178#233#193#167#229#213#188#221#218#217
- +#222#200'p'#186#217#216'='#252#215#243#193#233#245#218#221#3#180#10#175'eQ"'
- +#4#148'A'#129'&'#128#10#0#18#160#6#231'N'#190'>yccG'#251#242#214#230#193#139
- +#243#171#253#141#232#233#163'''k'#7'?B'#20#250'5'#168#240#18#205#197#255#11
- +'*'#1#2'x'#143'/'#134'W'#231#247'v'#239#2'8r'#155#174#169#214#243#147#11#6'c'
- +'n4'#229'['#241#255'_'#219'8y'#133#235#193#195#18#22#132'Y'#158','#136'+'#218
- +'M'#158#156#173'djV'#244#155'a'#196#244#140'n'#23'"A'#189'T'#189#242'25'#19
- +#203'2#'#169']'#145'j'#133')`t'#248#151#223#175#228'S&_1'#15#245#240#244#250
- +#236'l'#214#235#173#16#158#252#233'Wwn'#253#12#147#17#28'J'#7#143'R'#202'C'
- +#185#172#205#156'R'#3#168'X'#25'X'#226'KT9'#155#158#174'o'#230#193'_'#187#209
- +#232#252#236#241#245#233#211'b'#216'O'#196'i_ sBE'#237'QZ'#137#169#150#206
- +#196#153's'#214#164'lhP'#1#169#18#244#18'<'#197#213#168'w'#253#222#219'7%'#14
- +'RNt'#164#162'Tll'#241'S'#231'{'#244#158#179#189#137'6'#4#135'H'#28#27#196
- +#183#26#153')'#10#218#25#198'C'#25'a'#20#243#222#139#227#227#173#157'=/'#153
- +'].'#6'c'#127'=gV'#197'uHb)'#180#210'G_'#252#227'`'#253#29#226#132#202#145'4'
- +#177#150'('#19#133'YK'#9'K'#8'PB'#174#201#183#198#195'z'#127#239#7'q'#30#151
- +#139#233#204#135#145'/+'#19#211#200#227'h'#150#174#222#156'O'#166#168#26'/D'
- +#134'P!'#26'o'#241#222#152'W'#15#204#160#134#197#200'Z'#219#236#172#178#146
- +#165#173#238'v|'#171#209'}'#203#142#7#179#254'3;{f'#210'ti]'#248#230#169't'
- +#214#201'Z$'#10'm'#16'!x3'#155'|'#222'lobsb'#245#187'_'#254#226#252#252#232
- +#221#15#223#148#181#187'uY'#232#180#173';'#235#173't'#187'jN'#166#181#158#150
- +'K]W'#139#241#252#143#159#254#134#184#241#253#247#239'o'#221'{'#151#8'"'#29
- +#172'5'#205#246#26#216#170'w'#20#7#127#252#245#159#237#178#255#254#219#247'Y'
- +'\'#154#188'C'#168#171#197'l:'#169#203#201'd'#185#180'q'#148#181#179't%'#244
- +'?'#127#248#215#225#194#29#236'v'#144';hM'#136'$2'#166'f7'#216'q'#188#25#253
- +#250#231'?m'''#253#221#221#180#186#248'2'#147'm'#150#155#196#171'-'#211'n'
- +#166'n4'#25'(5'#181#178#136'''W'#179#139#207#238#228#189'y'#163#241#248#193
- +''''#251'?'#188#11'7Iw'#168#157'1'#1'B'#160#255#239'v4'#218#220#176'[y'#193
- +#224#171#229#248#136'F'#183#12#249#184#208#227'I1'#31#142#170#249'H'#215#179
- +#134#31'n7'#166'Y2jk5'#12#227#226#240'A'#246#209'O'#192#18'E'#6#247#13'ax'
- +#245#229#31':'#245#179'n>'#236'&e'#22#10#136#194#244#162#176':'#204#189#154
- +'/'#179'e'#145'K'#145'De'#134#237#228#141'F'#220#174#227#142'['#164#143#254
- +#249#217#7#31'~'#204'tD'#158#24#220#128'0[\'#28#173''''#182#233'g~1 '#26#211
- +#204#197#234#216#235#166#152'FSL'#211'Ex'#237','#214#185#178'P'#170#5#170#217
- +#200#175#199's'#134#3#214'o '#24#6'='#226'z'#210#191#220'j'#166#221#184#171
- +#28#228'B'#28#227'm"'#136'Bim'#140'h'#17'lE'#21'U'#146'T.'#159#204#236'2'#13
- +#181#151#147#191'='#188#253#227#183#240#181#161#253#6#139#222#194#181'FUHL'
- +#200#147#216'$'#6'ok'#197#194'S'#212#193'U^'#171#144'H'#29#9'x'#29#226#188'('
- +#227'qm!'#207#215'n\O'#22#183'1(c'#168#183#166#151#147'k'#217#239#15'N'#143
- +'/J'#237'|'#150'V'#243#249'_'#211'/'#2#1'n'#203'S'
- +'SS'#179#26'E'#205'YF'#205#206#190#2#255'"83'#250#162'@&|r'#254'&'#231'j.('
- +#178#2#11#11's'#30#159#207''''#18',..VUVV'#254'd>'#7#233'r'#153#195#212#208
- +#196'P'#16#243'.'#193'S'#207#175#187#133#133'o'#223#194'T'#177'&'#16',//'#215
- +#148#151#151#223'3@Mw@J'#10'A"'#157#130#173#5#193'q'#229'2'#191'TY'#22#24#31
- +#31#247'ttt'#136#30#172#174#174#190']VV'#182'h'#142#162#255#139#160#243'1'#0
- +#10#138#206#242#21'3'#201'n'#183'3IiOOOQww'#247#158'@'#16#8#4#222'+--'#253
- +#222'$'#129'Y'#142#11';'#192#164#137#224'*'#145#147'I'#202#132'r8'#236#252
- +#219#202#202#202'zooo'#213#220#220'\D XZZ'#250#0'='#184'{Y'#152#154#9#216#161
- +#230#224#138#10#201'd'#2'o'#1#160'v'#187#141#239'b{{'#251'QWW'#215#29#167#211
- +#249'5'#202'D'#5#130#137#137#137'"'#12#201#15'u'#31'U'#163#234#215#166#162
- +#247#249';'#140'0'#197#229'r'#169'8'#27#165#151#149#163#195#195#216#254#254
- +#254'i('#20#218#192#249#167'ccc'#198#143#13#252#7'P'#234#197'7'#247#18#190'`'
- +#0#0#0#0'IEND'#174'B`'#130
-]);
diff --git a/components/vlc/lclvlc.pp b/components/vlc/lclvlc.pp
deleted file mode 100644
index 6b7038fc6..000000000
--- a/components/vlc/lclvlc.pp
+++ /dev/null
@@ -1,106 +0,0 @@
-{
-
- Copyright (C) 2012 Michael Van Canneyt (michael@freepascal.org)
-
- This library is free software; you can redistribute it and/or modify it
- under the terms of the GNU Library General Public License as published by
- the Free Software Foundation; either version 2 of the License, or (at your
- option) any later version with the following modification:
-
- As a special exception, the copyright holders of this library give you
- permission to link this library with independent modules to produce an
- executable, regardless of the license terms of these independent modules,and
- to copy and distribute the resulting executable under terms of your choice,
- provided that you also meet, for each linked independent module, the terms
- and conditions of the license of that module. An independent module is a
- module which is not derived from or based on this library. If you modify
- this library, you may extend this exception to your version of the library,
- but you are not obligated to do so. If you do not wish to do so, delete this
- exception statement from your version.
-
- This program is distributed in the hope that it will be useful, but WITHOUT
- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
- FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
- for more details.
-
- You should have received a copy of the GNU Library General Public License
- along with this library; if not, write to the Free Software Foundation,
- Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
-}
-unit lclvlc;
-
-{$mode objfpc}{$H+}
-
-interface
-
-uses
- Classes, SysUtils, libvlc, vlc, controls;
-
-Type
-
- { TLCLVLCPlayer }
-
- TLCLVLCPlayer = Class(TVLCMediaPlayer)
- private
- FParentWindow: TWinControl;
- procedure SetLCLParentWindow(AValue: TWinControl);
- Protected
- procedure Notification(AComponent: TComponent; Operation: TOperation); override;
- Procedure SetParentWindow; override;
- Procedure SetParentWindowSize(AWidth,AHeight : Cardinal); override;
- Published
- Property ParentWindow : TWinControl Read FParentWindow Write SetLCLParentWindow;
- end;
-
-implementation
-
-{$ifdef Unix}
-{$ifdef lclgtk2}
-{$I vlcgtk2.inc}
-{$endif}
-{$ifdef lclqt}
-{$I vlcqt.inc}
-{$endif}
-{$endif}
-
-{ TLCLVLCPlayer }
-
-procedure TLCLVLCPlayer.SetLCLParentWindow(AValue: TWinControl);
-begin
- if FParentWindow=AValue then Exit;
- If Assigned(FParentWindow) then
- FParentWindow.RemoveFreeNotification(Self);
- FParentWindow:=AValue;
- If Assigned(FParentWindow) then
- FParentWindow.FreeNotification(Self);
-end;
-
-procedure TLCLVLCPlayer.Notification(AComponent: TComponent;
- Operation: TOperation);
-begin
- inherited Notification(AComponent, Operation);
- if (Operation=opRemove) and (AComponent=FParentWindow) then
- FParentWindow:=Nil;
-end;
-
-procedure TLCLVLCPlayer.SetParentWindow;
-begin
- if Assigned(ParentWindow) then
- begin
- {$IFDEF UNIX}
- libvlc_media_player_set_xwindow(Instance, GetXHandle(ParentWindow));
- {$else}
- {$IFDEF MSWINDOWS}
- libvlc_media_player_set_hwnd(Instance, Pointer(ParentWindow.Handle));
- {$else}
- {$ERROR This platform is currently not supported by the VLC player component}
- {$ENDIF}
- {$endif}
- end;
-end;
-
-procedure TLCLVLCPlayer.SetParentWindowSize(AWidth, AHeight: Cardinal);
-begin
-end;
-
-end.
diff --git a/components/vlc/reglazvlc.pas b/components/vlc/reglazvlc.pas
deleted file mode 100644
index 5254062ee..000000000
--- a/components/vlc/reglazvlc.pas
+++ /dev/null
@@ -1,26 +0,0 @@
-unit reglazvlc;
-
-{$IF FPC_FULLVERSION<20701}
-{$ERROR needs at least FPC 2.7.1}
-{$ENDIF}
-
-{$mode objfpc}{$H+}
-
-interface
-
-uses
- Classes, SysUtils, vlc, lclvlc, lresources;
-
-Procedure register;
-
-implementation
-
-Procedure register;
-begin
- RegisterComponents('Multimedia',[TLCLVLCPlayer,TVLCMediaListPlayer]);
-end;
-
-initialization
-{$i lazvlc.res}
-end.
-
diff --git a/components/vlc/test/frmmain.lfm b/components/vlc/test/frmmain.lfm
deleted file mode 100644
index 0b96d0339..000000000
--- a/components/vlc/test/frmmain.lfm
+++ /dev/null
@@ -1,82 +0,0 @@
-object Form1: TForm1
- Left = 479
- Height = 362
- Top = 224
- Width = 546
- Caption = 'Form1'
- ClientHeight = 362
- ClientWidth = 546
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- LCLVersion = '1.0.2.0'
- object PVideo: TPanel
- Left = 16
- Height = 285
- Top = 40
- Width = 518
- Anchors = [akTop, akLeft, akRight, akBottom]
- TabOrder = 0
- end
- object FEVideo: TFileNameEdit
- Left = 56
- Height = 23
- Top = 7
- Width = 374
- DialogTitle = 'Select a video file'
- FilterIndex = 0
- HideDirectories = False
- ButtonWidth = 23
- NumGlyphs = 0
- Anchors = [akTop, akLeft, akRight]
- MaxLength = 0
- TabOrder = 1
- end
- object Label1: TLabel
- Left = 16
- Height = 16
- Top = 7
- Width = 31
- Caption = 'Video'
- ParentColor = False
- end
- object Bplay: TButton
- Left = 462
- Height = 25
- Top = 8
- Width = 75
- Anchors = [akTop, akRight]
- Caption = '&Play'
- OnClick = BplayClick
- TabOrder = 2
- end
- object BStop: TButton
- Left = 17
- Height = 25
- Top = 331
- Width = 75
- Anchors = [akLeft, akBottom]
- Caption = '&Stop'
- OnClick = BStopClick
- TabOrder = 3
- end
- object BPause: TButton
- Left = 102
- Height = 25
- Top = 331
- Width = 75
- Anchors = [akLeft, akBottom]
- Caption = '&Pause'
- OnClick = BPauseClick
- TabOrder = 4
- end
- object BResume: TButton
- Left = 190
- Height = 25
- Top = 331
- Width = 75
- Anchors = [akLeft, akBottom]
- Caption = '&Resume'
- OnClick = BResumeClick
- TabOrder = 5
- end
-end
diff --git a/components/vlc/test/frmmain.pp b/components/vlc/test/frmmain.pp
deleted file mode 100644
index 4ba3a7a62..000000000
--- a/components/vlc/test/frmmain.pp
+++ /dev/null
@@ -1,77 +0,0 @@
-unit frmmain;
-
-{$mode objfpc}{$H+}
-
-interface
-
-uses
- Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
- EditBtn, StdCtrls, lclvlc, vlc, libvlc;
-
-type
-
- { TForm1 }
-
- TForm1 = class(TForm)
- Bplay: TButton;
- BStop: TButton;
- BPause: TButton;
- BResume: TButton;
- FEVideo: TFileNameEdit;
- Label1: TLabel;
- PVideo: TPanel;
- procedure BPauseClick(Sender: TObject);
- procedure BplayClick(Sender: TObject);
- procedure BResumeClick(Sender: TObject);
- procedure BStopClick(Sender: TObject);
- procedure FormCreate(Sender: TObject);
- procedure FormDestroy(Sender: TObject);
- private
- { private declarations }
- FPlayer : TLCLVlcPlayer;
- public
- { public declarations }
- end;
-
-var
- Form1: TForm1;
-
-implementation
-
-{$R *.lfm}
-
-{ TForm1 }
-
-procedure TForm1.FormCreate(Sender: TObject);
-begin
- FPlayer:=TLCLVLCPlayer.Create(Self);
- FPlayer.ParentWindow:=PVideo;
-end;
-
-procedure TForm1.BplayClick(Sender: TObject);
-begin
- Fplayer.PlayFile(FEVideo.FileName);
-end;
-
-procedure TForm1.BResumeClick(Sender: TObject);
-begin
- FPlayer.Resume;
-end;
-
-procedure TForm1.BPauseClick(Sender: TObject);
-begin
- FPLayer.Pause;
-end;
-
-procedure TForm1.BStopClick(Sender: TObject);
-begin
- FPlayer.Stop;
-end;
-
-procedure TForm1.FormDestroy(Sender: TObject);
-begin
- FreeAndNil(FPlayer);
-end;
-
-end.
-
diff --git a/components/vlc/test/testlcl.ico b/components/vlc/test/testlcl.ico
deleted file mode 100644
index 0341321b5..000000000
Binary files a/components/vlc/test/testlcl.ico and /dev/null differ
diff --git a/components/vlc/test/testlcl.lpi b/components/vlc/test/testlcl.lpi
deleted file mode 100644
index b288e8c18..000000000
--- a/components/vlc/test/testlcl.lpi
+++ /dev/null
@@ -1,108 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/components/vlc/test/testlcl.lpr b/components/vlc/test/testlcl.lpr
deleted file mode 100644
index d53cf7729..000000000
--- a/components/vlc/test/testlcl.lpr
+++ /dev/null
@@ -1,21 +0,0 @@
-program testlcl;
-
-{$mode objfpc}{$H+}
-
-uses
- {$IFDEF UNIX}
- cthreads,
- {$ENDIF}
- Interfaces, // this includes the LCL widgetset
- Forms, frmmain, libvlc, vlc, lclvlc, math;
-
-{$R *.res}
-
-begin
- setexceptionmask([exInvalidOp, exDenormalized, exZeroDivide,
- exOverflow, exUnderflow, exPrecision]);
- RequireDerivedFormResource := True;
- Application.Initialize;
- Application.CreateForm(TForm1, Form1);
- Application.Run;
-end.
diff --git a/components/vlc/test/testlcl.res b/components/vlc/test/testlcl.res
deleted file mode 100644
index 7c6cf3e4b..000000000
Binary files a/components/vlc/test/testlcl.res and /dev/null differ
diff --git a/components/vlc/tlclvlcplayer.png b/components/vlc/tlclvlcplayer.png
deleted file mode 100644
index 130b4d31e..000000000
Binary files a/components/vlc/tlclvlcplayer.png and /dev/null differ
diff --git a/components/vlc/tvlcmedialistplayer.png b/components/vlc/tvlcmedialistplayer.png
deleted file mode 100644
index 44bca4860..000000000
Binary files a/components/vlc/tvlcmedialistplayer.png and /dev/null differ
diff --git a/components/vlc/vlcgtk2.inc b/components/vlc/vlcgtk2.inc
deleted file mode 100644
index 5386f95bd..000000000
--- a/components/vlc/vlcgtk2.inc
+++ /dev/null
@@ -1,16 +0,0 @@
-{%MainUnit lclvlc.pp}
-
-uses gtk2proc, gtk2extra, ctypes, gtk2;
-
-Function GetXHandle(AWinControl : TWinControl) : culong;
-
-var
- Widget: PGtkWidget;
-begin
- Result:=0;
- if (AWinControl=nil) or (not AWinControl.HandleAllocated) then exit;
- Widget:={%H-}PGtkWidget(AWinControl.Handle);
- if Widget^.window = nil then exit;
- Result := gdk_window_xwindow(Widget^.window);
-end;
-
diff --git a/components/vlc/vlcqt.inc b/components/vlc/vlcqt.inc
deleted file mode 100644
index c0dd3b250..000000000
--- a/components/vlc/vlcqt.inc
+++ /dev/null
@@ -1,14 +0,0 @@
-{%MainUnit lclvlc.pp}
-
-uses qt45;
-
-Function GetXHandle(AWinControl : TWinControl) : culong;
-
-var
- Widget: PGtkWidget;
-begin
- Result:=0;
- if (AWinControl=nil) or (not AWinControl.HandleAllocated) then exit;
- Result:=QWidget_winID(TQtWidget(AWinControl.Handle).Widget);
-end;
-