Query1: Parameter 'Photograph' not found

Question

procedure TForm4.Button1Click(Sender: TObject);
var
  Locus,ParamToStr:string;
begin
  Locus:=ComboBox1.Text;
  with Form1 do
    begin
     Query1.Close;
     Query1.SQL.Clear;
    end;
  Form1.Query1.SQL.add('select Photograph from photo_t where Place='+'''Locus''');
  Form1.Query1.Active:=True;
  Form1.Query1.First;
  ParamToStr:=Form1.Query1.ParamByName('Photograph').AsString;
  Form4.Image1.Picture.LoadFromFile(ParamToStr);
end;检索的时候提示Query1: Parameter 'Photograph' not found
这是怎么回事？ps：
数据库album_db
表photo_t
属性之一Photograph

Answer 1

出错是：Unknown picture file extension (.)
出错行是最后一行：Form4.Image1.Picture.LoadFromFile(ParamToStr);怎么办？
PS：photograph属性的实值是图片文件的存储路径