我新建了一個窗體,添加了一個DBGrid,Datasource,Query組件,設置query1的databasename的屬性為:D:\05248,Active設置為true,   DBGrid1的datasource設置為datasource1,  datasource1的dataset設置為query1.
再添加了3個edit組件和一個button組件,
其中button的代碼為:procedure TForm1.Button1Click(Sender: TObject);
var id,xm,xb:String;
begin
  with query1 do
  begin
  close;
  SQL.clear;
  sql.add( 'insert into yuangong(no,name,sex) values( :id,:xm,:xb )' );
  parambyname('id').Asstring:=edit1.Text;
  parambyname('xm').AsString:=edit2.Text;
  parambyname('xb').AsString:=edit3.Text;
  execSQL;
  end;
end;運行,出現錯誤:
[Hint] Unit1.pas(72): Variable 'id' is declared but never used in 'TForm1.Button1Click'
[Hint] Unit1.pas(72): Variable 'xm' is declared but never used in 'TForm1.Button1Click'
[Hint] Unit1.pas(72): Variable 'xb' is declared but never used in 'TForm1.Button1Click'
這是真麽原因?
麻煩大家指點一下。在此,我謝謝大家樂!!!