Hallo allemaal,
Tijdens het ontwerpen zet ik een TPanel op een TForm en als ik dan de property Opacity op bv 0,5 zet dan wordt het panel netjes half transparant. Echter in runtime zie ik niks ervan, de kleur wordt gewoon in volle sterke weergegeven.
In de onPaint het het panel heb ik dit staan:
HTML Code:
procedure TForm2.Panel15Paint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); //ontspanning
begin
Canvas.Fill.Color := TAlphaColors.Blue;
Canvas.Stroke.Thickness := 1;
Canvas.FillRect(ARect,0,0,Allcorners,1);
Panel15.Opacity := 0.5;
end;
Als ik echter dit doe:
HTML Code:
procedure TForm2.Panel15Paint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); //ontspanning
begin
Panel15.Opacity := 0.5;
end;
Dan wordt panel wel half tranparant weergegeven maar dan zonder kleur.
Wat is de juiste manier om de panel half transparant te krijgen MET kleur?
Gr. frank
Bookmarks