Projekt Startet nicht

[darkrose]

da dieses Problem ja behoben ist habe ich leider noch eins...
ich bekomme den Fehler undefinierte Bezeichner und ich verstehe einfach nicht wieso.
Den Fehler bekomme ich für die Variablen autor und onr. Könnt ihr mit noch einmal helfen?

Code:

unit edit;

interface

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

type
  Tform2 = class(TForm)
    btnhinz: TButton;
    Button2: TButton;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    edname: TEdit;
    Query1: TQuery;
    Tnoten: TTable;
    DBnoten: TDatabase;
    DSnoten: TDataSource;
    DSQuery: TDataSource;
    ed1: TEdit;
    edonr: TEdit;
    procedure Button2Click(Sender: TObject);
    procedure btnhinzClick(Sender: TObject);

  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  form2: Tform2;

implementation

uses anzeige;
{$R *.dfm}

procedure Tform2.Button2Click(Sender: TObject);
begin
  form2.close;
end;



procedure Tform2.btnhinzClick(Sender: TObject);
begin
  name:= edname.Text;
  autor:= ed1.Text;
  onr := edonr.Text;
   Query1.SQL := 'INSERT INTO Lnoten (titel, autor, oid)'  +
   'VALUES (' + name + ', ' + autor +',' + StrToInt(onr) + ')';
end;

end.