O soy tonto o .... problema al liberar memoria

[cesarsoftware]

Gracias por tu respuesta "escafandra"

Pero sigo igual

he probado a usar

Código Delphi [-]
 if Win32Platform = VER_PLATFORM_WIN32_NT then
    SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);

y nada, lo que parece que la memoria se llena la del sistema operativo no de la aplicación.
Quizas, si pudiera leer la pantalla de otra forma, por ejemplo leyendo los pixeles del canvas de la pantalla y pasandolos al bitmap no consuma ram, pero he probado

Código Delphi [-]
    for x := 1 to ScreenWidth do
      for y := 1 to ScreenHeight do
        LBitmap.Canvas.Pixels[x, y] := clLime;//c.Pixels[x, y];
//    LBitmap.Canvas.CopyRect(r, c, r);

y me sigue gastado toda la ram

Con esto llego a la conclusion de que no se libera la ram por parte del sistema operativo y es siempre que lleno el bitmap, osea se libera el bitmap pero el "buufer" intermedio no.
¿Como podria pasar la imagen directamente al stream?

Gracias.