Ошибки при компиляции помогите исправить

[diman48]

вот код

unit sSkinProvider;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TsCustomSysMenu=class(TForm)
    procedure VisibleClose(Sender : TObject);
    procedure VisibleMax(Sender : TObject);
    procedure VisibleMin(Sender : TObject);
    procedure EnabledMax(Sender : TObject);
    procedure EnabledMin(Sender : TObject);
    procedure EnabledRestore(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  sCustomSysMenu: TsCustomSysMenu;


implementation

{$R *.DFM}

procedure TsCustomSysMenu.VisibleClose(Sender : TObject);
begin
(*

* Reference to: System.@AbstractError;
|
005187F4   E99FA4EEFF             jmp     00402C98
005187F9   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
005187FC   E997A4EEFF             jmp     00402C98
00518801   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518804   E98FA4EEFF             jmp     00402C98
00518809   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051880C   E987A4EEFF             jmp     00402C98
00518811   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518814   E97FA4EEFF             jmp     00402C98
00518819   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051881C   E977A4EEFF             jmp     00402C98
00518821   8D4000                 lea     eax, [eax+$00]
00518824   7088                   jo      005187AE
00518826   51                     push    ecx
00518827   0000                   add     [eax], al

*)
end;

procedure TsCustomSysMenu.VisibleMax(Sender : TObject);
begin
(*

* Reference to: System.@AbstractError;
|
005187FC   E997A4EEFF             jmp     00402C98
00518801   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518804   E98FA4EEFF             jmp     00402C98
00518809   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051880C   E987A4EEFF             jmp     00402C98
00518811   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518814   E97FA4EEFF             jmp     00402C98
00518819   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051881C   E977A4EEFF             jmp     00402C98
00518821   8D4000                 lea     eax, [eax+$00]
00518824   7088                   jo      005187AE
00518826   51                     push    ecx
00518827   0000                   add     [eax], al

*)
end;

procedure TsCustomSysMenu.VisibleMin(Sender : TObject);
begin
(*

* Reference to: System.@AbstractError;
|
00518804   E98FA4EEFF             jmp     00402C98
00518809   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051880C   E987A4EEFF             jmp     00402C98
00518811   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518814   E97FA4EEFF             jmp     00402C98
00518819   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051881C   E977A4EEFF             jmp     00402C98
00518821   8D4000                 lea     eax, [eax+$00]
00518824   7088                   jo      005187AE
00518826   51                     push    ecx
00518827   0000                   add     [eax], al

*)
end;

procedure TsCustomSysMenu.EnabledMax(Sender : TObject);
begin
(*

* Reference to: System.@AbstractError;
|
0051880C   E987A4EEFF             jmp     00402C98
00518811   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
00518814   E97FA4EEFF             jmp     00402C98
00518819   8D4000                 lea     eax, [eax+$00]

* Reference to: System.@AbstractError;
|
0051881C   E977A4EEFF             jmp     00402C98
00518821   8D4000                 lea     eax, [eax+$00]
00518824   7088                   jo      005187AE
00518826   51                     push    ecx
00518827   0000                   add     [eax], al

*)
end;

procedure TsCustomSysMenu.EnabledMin(Sender : TObject);
begin
(*

а вот ошибки как убрать подскажите плиз я прост в програмирование ноль(

[Error] sSkinProvider.pas(8): ',' or ';' expected but 'TYPE' found
[Warning] sSkinProvider.pas(28): File not found: 'sSkinProvider.DFM'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'sSkinProvider.pas'

если кто то заинтересуется я могу скинуть весь проэкт для компиляции мне нужна готовая программа пишите

[ДралсяСошибками]

ахахаха, эт ты из DD код вытащил?

[diman48]

Сообщение от ДралсяСошибками

ахахаха, эт ты из DD код вытащил?

я в этом не разбираюсь у меня есть проэкт толко он чето не компилируется вот и написал может найдутся люди которые помогут

[ДралсяСошибками]

Ну если весь проект в таком виде, то и не скомпилится))))

[Stilet]

толко он чето не компилируется

А он и не будет компилироваться. Тот кто тебе его дал жестоко тебя нае... надул.

[Serge_Bliznykov]

Сообщение от diman48

у меня есть проэкт

Не обманывайте себя и других. Нет у Вас проекта.
То, что Вы прогнали через DeDe (дизассемблер) нормальными исходниками проекта не является.

[diman48]

Сообщение от Serge_Bliznykov

Не обманывайте себя и других. Нет у Вас проекта.
То, что Вы прогнали через DeDe (дизассемблер) нормальными исходниками проекта не является.

нет уж проэкт есть это не прогон через дизассемблер это часть на которой компилятор выдает ошибку

[Serge_Bliznykov]

Сообщение от diman48

нет уж проэкт есть это не прогон через дизассемблер это часть на которой компилятор выдает ошибку

Да ну?! Есть проект?!
Ну, тогда, как говорится, Бог в помощь!

[Stilet]

есть это не прогон

Это результат работы Делфи Декомпилятора. Я им постоянно пользуюсь.
Либо ты хочешь нас обмануть и выдать взлом программы за чистую монету, либо обманули жестоко причем тебя самого.
Забей, в любом случае ничего не выйдет.

[Vapaamies]

Это в любом случае какая-то бредятина, сплошные вызовы System.AbstractError. Этот код не будет делать ничего полезного даже если исправить все вставки на нормальный ассемблер. Наверняка защита какая-то. Так что вы бросайте это дело, если не разбираетесь.