Rotar Imagen Bmp

[Neftali [Germán.Estévez]]

Por lo que he visto, no estás cargando las imágenes correctamente.
Si ejecutas paso a paso la aplicación, verás que cuando cargas las imágenes ejecutas este código:

Código Delphi [-]
for I := 0 to 3 do begin
      W.LoadFromFile('casa'+IntToStr(J)+'.jpg');
      FotosCasa[i] := TBitmap.Create;
        FotosCasa[i].Assign(W);

      FotosEdificio[i] := TBitmap.Create;
      W.LoadFromFile('edificio'+IntToStr(J)+'.bmp');
        FotosEdificio[i].Assign(W);
    end;

Lo que intenta es cargar imágenes que se llamen: casa0.jpg, casa90.jpg casa180.jpg y casa270.jpg

(1) Lo primero es que deberías cambiar el código par que cargue imágenes BMP, que son las que tienes en el directorio.
(2) Lo segundo es que si te fijas bien, el bucle usa la variable I y en el nombre del fichero usas la variable J, por lo tanto, estás cargando 4 veces la imagen casa0.JPG (que si existe).
(3) Por último, si quieres cargar las imágenes con números 0, 90, 180 y 270, tendrás que multiplicar el índice por 90.

El código para cargar las imágenes correctamente sería algo así:

Código Delphi [-]
var
  ...

  fName:string;
begin

...

/////////////////////// cargar imágenes
  W := TWicImage.Create;
  J := 0;
  try
    for I := 0 to 3 do begin
      fName := 'casa'+IntToStr(90*I)+'.bmp';
      W.LoadFromFile(fName);
      _FotosCasa[i] := TBitmap.Create;
      _FotosCasa[i].Assign(W);

      FotosEdificio[i] := TBitmap.Create;
      fName := 'edificio'+IntToStr(90*I)+'.bmp';
      W.LoadFromFile(fName);
      FotosEdificio[i].Assign(W);
    end;

[DaniMir]

Mil gracias, me sirvió de mucho!!!

quién diria que sólo era agregar un par de líneas

[DaniMir]

Ya sólo me queda una duda y espero no sea demasiado inoportuna...

Se supone que en guardar elijo todas la imágenes de casa y edificio rotadas también, pero al abrir el archivo no me las coloca como tal

[Neftali [Germán.Estévez]]

Es posible que sea problema de GUARDAR, no del RECUPERAR, ya que da la impresión de que en el fichero no hay información de la rotación.