Hallo allemaal,
Op een form staat een Image1 welke voorzien is van een plaatje. Over Image1 wordt Image2 gezet, zelfde afmeting als Image1.
Bij het runnen van het programma wordt Image2 weergegeven als een zwart plaatje en is niet transparant.
Image2.Tranparent := True;
Waarom werkt dit niet en hoe los je dit op?
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
Image2.Canvas.Pen.Color := clRed;
Image2.Canvas.Pen.Width:=3;
Image2.Canvas.Brush.Style := bsClear; // ===> Dit werkt niet
Image2.Canvas.Rectangle(Rect(0,0,90,90));
end;
Bookmarks