procedure TForm1.FormCreate(Sender: TObject);
var 
    ig : TImage;
begin
......ig:=TImage.Create(Form1);
with ig do
     begin
       Parent := Form1;
    Left := 8;
    Top := 8 ;
    Width := 273 ;
    Height := 313;
    Stretch := true;
    Picture.LoadFromFile('F:\work\'+ExcelApp.Cells[1,1].Value+'.jpg');
     end;
end;怎么在运行的时候说Could not convert variant of type(String) into type(Double)