Double Buffering af TForms Canvas i BCB 4

Du kan Opretten en TBitmap, og tegne det på dens Canvas.

Så kan du sætte en timer til at opdatere din TForms canvas.

Altså noget ala:
Bitmap1->Canvas->Ellipse(0,0,100,100);
Form1->Canvas->Draw(0,0,Bitmap1);
?
For det virker nemlig ikke :/ (der kommer intet på Form1)

Skriv lige en mail til Jens@Borrisholt.com så skal du få et eksempel der virker.

Jens B

Nej glem det ...

Du kan hente den her :
http://www.borrisholt.com/eksperten/DoubleBuffering.zip

Hmmm jeg må indrømme at jeg ikke kan se hvorfor det ikke virker, da jeg gør det samme som du gør i dit eksempel (der btw. ikke er lavet i BCB :D) Det her burde da virke ?

Graphics::TBitmap *bimp = new Graphics::TBitmap();
bimp->Canvas->Brush->Color = clWhite;
bimp->Canvas->Rectangle(0,0,100,100);
Form1->Canvas->Draw(0,0,bimp);

nej jeg sætter Pixelformat på min TBitmap, ellers virker det ikke

Graphics::TBitmap *bimp = new Graphics::TBitmap();
bimp->PixelFormat = pf32bit;
bimp->Canvas->Brush->Color = clWhite;
bimp->Canvas->Rectangle(0,0,100,100);
Form1->Canvas->Draw(0,0,bimp);

Stadigvæk intet resultat :/

Har fundet problemet, eller noget af det anyway:

        Graphics::TBitmap *bimp = new Graphics::TBitmap();
        bimp->PixelFormat = pf32bit;
        bimp->Canvas->Brush->Color = clWhite;
        bimp->Canvas->Pen->Color = clBlack;
        bimp->Canvas->Rectangle(0,0,100,100);
        if (bimp->Empty)
                ShowMessage("ÆV");

Så skriver den ÆV, altså godtager den ikke bimp->Canvas->Rectangle (på trods af at jeg har sat alt muligt gejl)

Her er btw. hvad hjælp filen siger om TBitmap->Canvas:

Canvas allows drawing on the bitmap by providing a TCanvas object for this purpose. Drawing on the canvas effectively modifies the underlying bitmap image pixels. Any canvas operation is valid on a bitmapnot just Draw and StretchDrawincluding line drawing, rectangles, and circles. The bitmap object is passed as a parameter to these methods.

Det ser ud til at man skal smide bitmap objektet med som parameter til rectangle, ellipse etc. Men parameterlisten til de 2 er jo bare int,int,int,int så det fatter jeg ik helt :/

LOL jeg har netop fundet problemet selv: height og width var = 0.

Men hmm det løste ikke problemet at gøre følgende (ligger i OnPaint-eventen for formen):

        bitmap->Canvas->Rectangle(0,ForskydningY, rumX, rumY+ForskydningY);
        for (int i = 0; i < plads; i++)
                ting[i]->paint(); // tegner div. objekter på bitmap
        FrmMain->Canvas->Draw(0,0,bitmap);

det flimrer stadigvæk - så nu er spørgsmålet bare hvad jeg gør forkert ?

Nåja jeg kalder Repaint hver gang jeg flytter på et objekt, måske det er der problemet ligger ? (Dvs. for hver pixel jeg flytter et objekt så kalder den repaint())

Ah nm det var Repaint()s skyld :)