DoubleBuffered in API

[FAlter]

Kuck mal hier:

http://www.delphi-forum.de/topic_Wie...ichnen_74.html

ein fertiger code

Delphi-Quellcode:

var  
    dc,dctmp:HDC;  
    bitmap:HBITMAP;  
begin  
     dc:=GetDC(windowhandle);  
     bitmap:=CreateCompatibleBitmap(dc,windowwidth,windowheight);  
     dctmp:=CreateCompatibleDC(dc);  
     SelectObject(dctmp,bitmap);  
     //-->Alles ZEICHNEN  
     zeichnen(dctmp);  
     //<--Alles ZEICHNEN  
     bitblt(dc,0,0,windowwidth,windowheight,dctmp,0,0,srccopy);  
     DeleteDC(dctmp);  
     DeleteObject(bitmap);  
     ReleaseDC(windowhandle,dc);  
end;

Und anstelle die Prozedur Zeichnen aufzurufen, einfach auf deine dctmp Zeichnen.