removed: skins

Forms/DownloadItemFrame.dfm

@@ -5,7 +5,7 @@ object DownloadUIItem: TDownloadUIItem
   Height = 141
   Anchors = [akLeft, akTop, akRight]
   TabOrder = 0
-  object sBevel1: TsBevel
+  object sBevel1: TBevel
     Left = 0
     Top = 138
     Width = 1116
@@ -14,20 +14,18 @@ object DownloadUIItem: TDownloadUIItem
     Shape = bsBottomLine
     ExplicitTop = 91
   end
-  object sPanel1: TsPanel
+  object sPanel1: TPanel
     Left = 227
     Top = 0
     Width = 889
     Height = 138
     Align = alClient
     BevelOuter = bvNone
     TabOrder = 0
-    SkinData.SkinSection = 'PANEL'
-    ExplicitHeight = 141
     DesignSize = (
       889
       138)
-    object ProgressLabel: TsLabel
+    object ProgressLabel: TLabel
       Left = 55
       Top = 93
       Width = 67
@@ -36,90 +34,73 @@ object DownloadUIItem: TDownloadUIItem
       Caption = 'ProgressLabel'
       ExplicitTop = 95
     end
-    object ProgressBar: TsGauge
+    object ProgressBar: TGauge
       Left = 6
       Top = 110
       Width = 791
       Height = 19
       Anchors = [akLeft, akRight, akBottom]
-      Animated = False
-      SkinData.SkinSection = 'GAUGE'
-      ForeColor = clBlack
       Progress = 0
-      Suffix = '%'
       ExplicitTop = 109
       ExplicitWidth = 564
     end
-    object FileNameLabel: TsLabel
+    object FileNameLabel: TLabel
       Left = 6
       Top = 22
       Width = 68
       Height = 13
       Caption = 'FileNameLabel'
     end
-    object LinkLabel: TsLabel
+    object LinkLabel: TLabel
       Left = 6
       Top = 3
       Width = 43
       Height = 13
       Cursor = crHandPoint
       Caption = 'LinkLabel'
-      ParentFont = False
       Font.Charset = DEFAULT_CHARSET
       Font.Color = clWindowText
       Font.Height = -11
       Font.Name = 'Tahoma'
       Font.Style = [fsUnderline]
+      ParentFont = False
     end
-    object FormatList: TsComboBox
+    object FormatList: TComboBox
       Left = 55
       Top = 41
       Width = 817
       Height = 21
-      Anchors = [akLeft, akTop, akRight]
-      Alignment = taLeftJustify
-      BoundLabel.Active = True
-      BoundLabel.Caption = 'Format:'
-      VerticalAlignment = taAlignTop
       Style = csDropDownList
-      ItemIndex = -1
+      Anchors = [akLeft, akTop, akRight]
       TabOrder = 0
     end
-    object SubtitleList: TsComboBox
+    object SubtitleList: TComboBox
       Left = 55
       Top = 68
       Width = 817
       Height = 21
-      Anchors = [akLeft, akTop, akRight]
-      Alignment = taLeftJustify
-      BoundLabel.Active = True
-      BoundLabel.Caption = 'Subtitles:'
-      VerticalAlignment = taAlignTop
       Style = csDropDownList
-      ItemIndex = -1
+      Anchors = [akLeft, akTop, akRight]
       TabOrder = 1
     end
-    object DeleteButton: TsButton
+    object DeleteButton: TButton
       Left = 803
       Top = 107
       Width = 75
       Height = 25
       Anchors = [akRight, akBottom]
       Caption = 'Remove'
       TabOrder = 2
-      ExplicitTop = 110
     end
   end
-  object sPanel2: TsPanel
+  object sPanel2: TPanel
     Left = 0
     Top = 0
     Width = 227
     Height = 138
     Align = alLeft
     TabOrder = 1
-    SkinData.SkinSection = 'PANEL'
-    ExplicitHeight = 141
-    object PrevievImg: TsImage
+    object PrevievImg: TImage
       Left = 1
       Top = 1
       Width = 225
@@ -129,7 +110,6 @@ object DownloadUIItem: TDownloadUIItem
       Picture.Data = {07544269746D617000000000}
       Proportional = True
       Transparent = True
-      SkinData.SkinSection = 'CHECKBOX'
       ExplicitWidth = 110
       ExplicitHeight = 110
     end

Forms/DownloadItemFrame.pas

@@ -1,80 +1,80 @@
-{ *
-  * Copyright (C) 2011-2015 ozok <ozok26@gmail.com>
-  *
-  * This file is part of TEncoder.
-  *
-  * TEncoder is free software: you can redistribute it and/or modify
-  * it under the terms of the GNU General Public License as published by
-  * the Free Software Foundation, either version 2 of the License, or
-  * (at your option) any later version.
-  *
-  * TEncoder 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 General Public License for more details.
-  *
-  * You should have received a copy of the GNU General Public License
-  * along with TEncoder.  If not, see <http://www.gnu.org/licenses/>.
-  *
-  * }
-unit DownloadItemFrame;
-
-interface
-
-uses
-  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes,
-  Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, sPanel,
-  sGauge, Vcl.StdCtrls, sComboBox, sLabel, acImage, sButton, sBevel;
-
-type
-  TDownloadUIItem = class(TFrame)
-    LinkLabel: TsLabel;
-    FileNameLabel: TsLabel;
-    FormatList: TsComboBox;
-    SubtitleList: TsComboBox;
-    ProgressLabel: TsLabel;
-    ProgressBar: TsGauge;
-    sPanel1: TsPanel;
-    DeleteButton: TsButton;
-    sPanel2: TsPanel;
-    PrevievImg: TsImage;
-    sBevel1: TsBevel;
-  private
-    { Private declarations }
-  public
-    { Public declarations }
-    procedure ResetProgressLabel;
-    procedure Disable;
-    procedure Enable;
-  end;
-
-implementation
-
-{$R *.dfm}
-{ TDownloadUIItem }
-
-procedure TDownloadUIItem.Disable;
-begin
-  LinkLabel.Enabled := False;
-  FileNameLabel.Enabled := False;
-  FormatList.Enabled := False;
-  SubtitleList.Enabled := False;
-  DeleteButton.Enabled := False;
-end;
-
-procedure TDownloadUIItem.Enable;
-begin
-  LinkLabel.Enabled := True;
-  FileNameLabel.Enabled := True;
-  FormatList.Enabled := True;
-  SubtitleList.Enabled := True;
-  DeleteButton.Enabled := True;
-end;
-
-procedure TDownloadUIItem.ResetProgressLabel;
-begin
-  ProgressLabel.Caption := '';
-  ProgressBar.Progress := 0;
-end;
-
-end.
+{ *
+  * Copyright (C) 2011-2016 ozok <ozok26@gmail.com>
+  *
+  * This file is part of TEncoder.
+  *
+  * TEncoder is free software: you can redistribute it and/or modify
+  * it under the terms of the GNU General Public License as published by
+  * the Free Software Foundation, either version 2 of the License, or
+  * (at your option) any later version.
+  *
+  * TEncoder 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 General Public License for more details.
+  *
+  * You should have received a copy of the GNU General Public License
+  * along with TEncoder.  If not, see <http://www.gnu.org/licenses/>.
+  *
+  * }
+unit DownloadItemFrame;
+
+interface
+
+uses
+  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, 
+  System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, 
+  Vcl.StdCtrls, Vcl.Samples.Gauges;
+
+type
+  TDownloadUIItem = class(TFrame)
+    LinkLabel: TLabel;
+    FileNameLabel: TLabel;
+    FormatList: TComboBox;
+    SubtitleList: TComboBox;
+    ProgressLabel: TLabel;
+    ProgressBar: TGauge;
+    sPanel1: TPanel;
+    DeleteButton: TButton;
+    sPanel2: TPanel;
+    PrevievImg: TImage;
+    sBevel1: TBevel;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+    procedure ResetProgressLabel;
+    procedure Disable;
+    procedure Enable;
+  end;
+
+implementation
+
+{$R *.dfm}
+{ TDownloadUIItem }
+
+procedure TDownloadUIItem.Disable;
+begin
+  LinkLabel.Enabled := False;
+  FileNameLabel.Enabled := False;
+  FormatList.Enabled := False;
+  SubtitleList.Enabled := False;
+  DeleteButton.Enabled := False;
+end;
+
+procedure TDownloadUIItem.Enable;
+begin
+  LinkLabel.Enabled := True;
+  FileNameLabel.Enabled := True;
+  FormatList.Enabled := True;
+  SubtitleList.Enabled := True;
+  DeleteButton.Enabled := True;
+end;
+
+procedure TDownloadUIItem.ResetProgressLabel;
+begin
+  ProgressLabel.Caption := '';
+  ProgressBar.Progress := 0;
+end;
+
+end.