Oben links brauchst du doch gar nicht.
du holst doch das Bild über das
Handle und das startet bei x=0 und y=0.
und GetClientRect(hWindow, R);
gibt dir ein Rect zurück. Da verwendest du Width und Height.
Width := R.Width;
Height := R.Height;
und bitte noch setzen:
Left := 0;
Top := 0;
dann klappt auch dein BitBlt.
BitBlt(bm.Canvas.Handle,
0,
0,
Width,
Height,
Dc,
Left,
Top,
SRCCOPY);