Doublebuffer

[theomega]

Oki, geht immer noch nicht:
folgender Code:

Delphi-Quellcode:

var   DC:HDC;
  dbldc:HDC;
  dbl:HBITMAP;

...

   dc := getdc(hwnd);

   dbldc := CreateCompatibleDC(dc);
   dbl := CreateCompatibleBitmap(dbldc,500,500);
   SelectObject(dbldc,dbl);

   textout(dbl,20,20,'TEST',4);
   bitblt(dc,0,0,500,500,dbl,0,0,SRCPAINT);

Jetzt müßte doch ein TEST auf den Bidlschirm stehen, tut es aber nicht! Was ist falsch?