Delphiden Sql server' Adoquery ile kayıt eklemek

[MURATYAKAR]

Delphiden Sql server'a Adoquery ile kayıt eklemek istiyorum ama hata veriyor sizce nerede eksik var Yardımlarınız için simdiden teşekkürler.


procedure TForm5.Button1Click(Sender: TObject);

begin
with ADOquery1 do
begin
Close;
SQL.Clear;
SQL.TEXT:='Insert INTO Bolgeler(BolgeAdi)';
SQL.TEXT:='Values(:BolgeAdi)';
Parameters.ParamByName('BolgeAdi').Value:=Edit1.Te xt;
ExecSQL;
end;
end;

[epic]

	with ADOQuery1 do begin
	  SQL.Clear;
	  SQL.Add('INSERT INTO Bolgeler(BolgeAdi) VALUES(:BolgeAdi)');
	  Parameters[0].Value := Edit1.Text;
	  ExecSQL;
	end;