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

[zigzac-zigzac]

Всем Привет!

В первой форме при нажатии кнопки Buttun создаётся таблица и переход на следующую форму.
Во второй к этой таблице добавляем записи со значениями.
(мне нужно простой пример отладить , а остальное я уже навешаю).
Первая форма

unit Unit3;

interface

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

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

var
Form3: TForm3;

implementation

uses Unit4;

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);
var
S:String;
begin
s := 'CREATE TABLE V(V Int,B Int)';
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(s);
ADOQuery1.ExecSQL;
Form3.Hide;
Form4.Show

end;

end.

Вторая форма

unit Unit4;

interface

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

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

var
Form4: TForm4;

implementation

{$R *.dfm}

procedure TForm4.Button1Click(Sender: TObject);
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM V');
ADOQuery1.Open;
ADOQuery1.SQL.Add('INSERT INTO V(V,B)VALUES(2,2)');
ADOQuery1.ExecSQL;
ADOQuery1.Close;
ADOQuery1.Post

end;

end.

Пишет ошибка в поле FROM.
Как исправить?
Может WHERE надо? (только какие значения ставить после него не пойму)

Спасибо за участие..............



________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(это кнопочка на панели форматирования с решёточкой #)
Не забывайте об этом!

Модератор.

[Stilet]

V(V Int

И зачем имя поля давать таблице этого поля? Неужели другое имя придумать не получилось?

Пишет ошибка в поле FROM.

Сколько можно повторять?: Текст ошибок нужно приводить. Иначе иди переделывай имена полей и надейся на авось.

[Аватар]

На ExecSQL в последней процедуре и даст ошибку, поскольку в SQL много чего наворочено

[eval]

http://delphimaster.ru/cgi-bin/forum...1399829902&n=1