Добавление записи в БД. ( Pascal )

[zigzac-zigzac]

Здравствуйте!

unit Unit3;

interface

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

type
  TForm3 = class(TForm)
    ADOConnection1: TADOConnection;
    DataSource1: TDataSource;
    DBGrid1: TDBGrid;
    Button1: TButton;
    ADOQuery1: TADOQuery;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);
 var A: Integer;
begin
A:=StrToInt(Edit1.Text);
if A=3 then
begin
ADOQuery1.FieldByName('1').AsString:='2';
end;
begin
ADOQuery1.FieldByName('1').AsString:='0';
end;
end;
end.

Выдаёт ошибку field'1' not found.

Как исправить?
Как правильно связать значение в поле БД и компонент?

[Serge_Bliznykov]

1) зачем Вы ещё одну тему создали? Вашу предыдущую тему закрыть/удалить?

2) Так, как Вы пишете, нельзя писать.
Вы что хотите добится этим кодом?
Если Вы хотите ДОБАВИТЬ новую запись (строчку с данными) в таблицу БД, то используйте метод Append() или Insert()
потом заполняете нужные поля и потом вызываете метод Post()
Разумеется, предварительно набор данных должен быть открыт.


p.s. может быть, Вам стоит сначала ознакомиться с теорией работы с БД в Delphi, благо информации по этому вопросу полно...