Ошибка "Invalid property value" при компиляции

unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ShellApi, Registry, IdBaseComponent, IdComponent,
  IdTCPConnection, IdTCPClient, IdHTTP, sSkinProvider, sSkinManager, TlHelp32,
  ExtCtrls, EncdDecd, acPNG, OleCtrls, SHDocVw, Menus, NB30 ;
 
 Type
 
  TForm1 = class(TForm)
    ListBox1: TListBox;
    Button2: TButton;
    Button3: TButton;
    Label1: TLabel;
    Label2: TLabel;
    IdHTTP1: TIdHTTP;
    Memo1: TMemo;
    Memo2: TMemo;
    Memo3: TMemo;
    ListBox2: TListBox;
    Close: TButton;
    ComboBox1: TComboBox;
    Label3: TLabel;
    Timer1: TTimer;
    Edit1: TEdit;
    Button1: TButton;
    Timer2: TTimer;
    Label5: TLabel;
    Label6: TLabel;
    Vk: TImage;
    Like: TImage;
    Mail: TImage;
    YouTube: TImage;
    MainMenu1: TMainMenu;
    N2: TMenuItem;
    N1: TMenuItem;
    Button5: TButton;
    OpenDialog1: TOpenDialog;
    ComboBox2: TComboBox;
    N3: TMenuItem;
    sSkinManager1: TsSkinManager;
    sSkinProvider1: TsSkinProvider;
    procedure Load(Sender: TObject);
    procedure Vhod(Sender: TObject);
    procedure Next(Sender: TObject);
    //procedure Button4Click(Sender: TObject);
    procedure ListBox2Click(Sender: TObject);
    procedure CloseClick(Sender: TObject);
    procedure Updater(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Timer2Timer(Sender: TObject);
    procedure LikeClick(Sender: TObject);
    procedure YouTubeClick(Sender: TObject);
    procedure VkClick(Sender: TObject);
    procedure N2Click(Sender: TObject);
    procedure News(Sender: TObject);
    procedure N1Click(Sender: TObject);
    procedure Button5Click(Sender: TObject);
    procedure N3Click(Sender: TObject);
    procedure Del(Sender: TObject);
 
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
  TForm3 = class(TForm)
    private
    { Private declarations }
  public
    { Public declarations }
  end;
 
 TForm2 = class(TForm)
    private
    { Private declarations }
  public
    { Public declarations }
  end;
  
Const
   versionp = '0.0.3';
 StartKey = 1556;  // Start default key
 MultKey = 955; // Mult default
 AddKey = 2365;  // Add default key
 
var
  hw:hWND;
  Form1: TForm1;
  VipAccount, Flag:Boolean;
  vip, reklama, kluch:string;
  rekN:integer;
  SerialNum,dtyp:Dword;
  oa,ob:DWORD;
  Buffer,disk: array [0..255] of char;
 
  implementation
 
uses Unit2, Unit3, Unit4, Unit5, Unit6;
 
{$R *.dfm}
.....