关于TQuery中插入记录的问题.(100分)

我用一个按钮按下时执行以下语句:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('insert into contractmaster (id1,name,supply,amount,startdate,enddate)');
Query1.SQL.Add(':id1,:name,:supply,:amount,:startdate,:enddate');
Query1.ExecSQL;
但其中amount参数是货币型的，我用的ACCESS2000数据库，但下面有一条语名提示没有声明。请问是怎么回事？谢谢赐教！我是初学者。
Query1.ParamByName('id1').AsString:=edit1.Text;
Query1.ParamByName('name').AsString:=edit2.Text;
Query1.ParamByName('supply').AsString:=edit3.Text;
[red] Query1.ParamByName('amount').AsSingle:=edit4.Text;[/red]
Query1.ParamByName('startdate').AsDate:=startdate.Date;
Query1.ParamByName('enddate').AsDate:=enddate.Date;

Query1.ParamByName('amount').AsCurrency:=StrToFloat(edit4.Text);

StrToCurr

Query1.ParamByName('amount').AsCurrency:=StrToCurr (edit4.Text);