procedure TForm2.FormShow(Sender: TObject);
begin
   label2.Caption :=song.Form1.temp_id    ;
   ADODataset1.Close;
   ADODataset1.CommandText:='select * from song where quse_id = '+trim(label2.Caption) ;
   ADODataset1.Open;
   label2.Caption:=adodataset1.FieldByName('quse_content').AsString;end;
  
提示错误,说quse_id参数没有默认值,怎么回事呢