Results 1 to 2 of 2

Thread: Layers in BGRABitmap werkt niet goed

  1. #1

    Layers in BGRABitmap werkt niet goed

    Hallo allemaal,

    Ik krijg het niet voor elkaar om Bmp weer te geven op het Form. Wat doe ik fout en hoe los je dat op?

    Met een vriendelijke groet, Frans

    Code:
    PROCEDURE TForm1.FormCreate(Sender: TObject);
    
    BEGIN
      TekenVlak.X := 640;
      TekenVlak.Y := 480;
      Layers  := TBGRALayeredBitmap.Create(TekenVlak.X, TekenVlak.Y);
      Bmp := TBGRABitmap.Create(640,480,BGRAtoColor(clRed));
      Layers.AddLayer('Laag 0',Bmp,200);
    
      UpdateLayerList(-1);
      DrawCheckers(Bmp);
      Layers.Draw(bmp,0,0);                      //  ===> Bmp wordt niet weergegeven maar bestaat wel
    END;

  2. #2
    Senior Member Wok's Avatar
    Join Date
    Dec 2002
    Location
    Alkmaar
    Posts
    2,085
    Oei dat is voor mij lang terug, de laag moet je wel zichtbaar maken.

    Layers.LayerVisible[0] := true;

    gr.peter
    10.4.2, Delphi2010, of Lazarus 2.2.0

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •