Здравствуйте! Вопрос от новичка-студента...
На форме есть 4 картинки и вопрос.
Правильный ответ(например 3) нужно в виде числа ввести в элемент Edit1 и нажать кнопку Buttun.
При нажатии кнопки если ответ правильный то в БД (BDE Administrator) нужно добавить ряд и в 1 столбец зачислить 2, а если нет то 0.
Компилятор в разных местах выдаёт ошибки. Пробовал по всякому. Где ошибка?

unit Unit1;

interface

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

type
TForm1 = class(TForm)
Table1: TTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Edit1: TEdit;
Button1: TButton;
Label1: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;


implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var A: Integer; \\ присвоить числовой тип данных
begin
A:=StrToInt(Edit1.Text); \\перевести из строки в число
end;
begin
Table1.First; \\добавить ряд в БД и присоеденить
Table1.Insert;
end;

begin
If
A:='3' \\присвоить а=3
then
begin
Table1.FieldByName('1').AsString:='2'; \\если да то добавить в первый столб 2
Table1.Post
end
else
begin
Table1.FieldByName('1').AsString:='0'; \\если нет то добавить 0
Table1.Post
end;