Duda con DeleteObject
 

Tengo la siguiente duda:

Creando un archivo de recursos en el que uno de ellos es un bitmap con nombre ClubDelphi.

Código Delphi [-]
var
    FBitmap: HBITMAP;
begin
       FBitmap:= LoadBitmap(hinstance, 'ClubDelphi');
    // Hago algo y luego libero el recurso.
       DeleteObject(FBitmap);
end;

Ahora todo OK, la duda es si al usar el siguiente código debo liberar algo usando DeleteObject o el mismo EXE libera el recurso del compente Image

Código Delphi [-]
begin
       Image1.Picture.Bitmap.Handle:= LoadBitmap(HInstance, 'ClubDelphi');
    // ¿Estara esto de más?  DeleteObject(HInstance);
end;

Hola MAXIUM, sobre los objetos que te creas una vez que los termines de utilizarlos debes liberarlos.

Código Delphi [-]
   try
     FBitmap:= LoadBitmap(hinstance, 'ClubDelphi');
     // Hago algo y luego libero el recurso.
   finally
     FBitmap.Free;
   end;

Saluditos

Creo que la pregunta de Maxium va encaminada a saber si al liberar el objeto (método Free) también se libera el handle que devuelve Windows en la función LoadBitmap.

Digamos que uno está acostumbrado a la comodidad de la VCL sin recurrir a llamadas a la API de Windows (como lo es LoadBitmap) y es natural que uno se desconcierte al usarlas, sobre todo si tenemos en cuenta el tajante texto de la ayuda del SDK de Windows:

Pero, es bueno recordar también que la VCL hace un gran trabajo para protegernos de estos detalles.

Hay que recordar que una propiedad como Bitmap.Handle, no es una variable cualquiera, y la asignación de un valor a ella, pasa por un método (SetHandle) que, entre otras cosas, se encargará de aplicar el DeleteObject al handle anterior, en caso de que ya hubiera uno asignado. Y, al liberarse el objeto, el destructor se encargará igualmente de aplicar DeleteObject cuando sea necesario.

En resumen, no es necesario aplicar DeleteObject uno mismo, pues la VCL se encarga de ello, pero, claro está, como dice Caro, es indisplensable liberar el objeto Bitmap con Free.

Bye

Excelente respuesta, muchas gracias las cosas me han quedado claras.