[pablopessoa]

Gracias por responder pero eso tampoco funcionaba, al final lo arregle de esta manera :

Código Delphi [-]
if nombrecroquis<>'' then
    begin
        try
           bmp:=TBitmap.Create;
           jpg:=TJPEGImage.Create;
           jpg.LoadFromFile(carpeta_instalacion+'FOTOS\CROQUIS\'+nombrecroquis);
           bmp.Assign(jpg);
           Image1.Picture.Assign(bmp);
           bmp.Free;
        finally

        end;