Go Back   FileForums > Game Backup > PC Games > PC Games - CD/DVD Conversions > Conversion Tutorials
Register FAQ Community Calendar Today's Posts Search

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 03-10-2021, 05:32
Cuttlas's Avatar
Cuttlas Cuttlas is offline
Registered User
 
Join Date: Aug 2020
Location: Near You :)
Posts: 62
Thanks: 19
Thanked 10 Times in 5 Posts
Cuttlas is on a distinguished road
Exclamation Transparent Canvas (Bitmap Image)

I have created a TBitmap Image and I'm filling it in using Canvas.

I need to make it transparent, with no border, and no background color. is this possible? if yes, how?

Code:
var
  CustomButton: TBitmapImage;

// Drawing
//*************
procedure RedrawCustomButton;
var
  Canvas: TCanvas;
begin
  Canvas := CustomButton.Bitmap.Canvas;

  Canvas.Pen.Style := psClear;
  Canvas.Brush.Color := clBtnFace;
  Canvas.Rectangle(0, 0, CustomButton.Bitmap.Width, CustomButton.Bitmap.Height);

  Canvas.Pen.Style := psSolid;
  Canvas.Pen.Mode := pmCopy;
  Canvas.Pen.Color := clBlack;
  Canvas.Brush.Style := bsClear;
  Canvas.Rectangle(0, 0, CustomButton.Bitmap.Width, CustomButton.Bitmap.Height);
end;
//*************

procedure InitializeWizard();
var
  Page: TWizardPage;
begin
  WizardForm.InnerPage.Color := clYellow;

  Page := CreateCustomPage(wpWelcome, '', '');

  CustomButton := TBitmapImage.Create(WizardForm);
  CustomButton.Parent := Page.Surface;
  CustomButton.Top := 0;
  CustomButton.Left := 0;
  CustomButton.Width := ScaleX(128);
  CustomButton.Height := ScaleX(32);
  CustomButton.Bitmap.Width := CustomButton.Width;
  CustomButton.Bitmap.Height := CustomButton.Height;
  RedrawCustomButton;
end;
Reply With Quote
Sponsored Links
Reply


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
INNO TROUBLESHOOT - Tutorials and Answers about INNO Setup REV0 Conversion Tutorials 129 21-05-2021 05:51
Useful Dll for Inno Setup users peterf1999 Conversion Tutorials 88 01-12-2017 16:00
Tutorial using CI 8.0.0 yener90 Conversion Tutorials 424 21-10-2014 09:49
Sims 2 open for business mounted fixed image but cannot make image work need help! kokonut PC Games 1 23-01-2007 16:30
Frequently Asked Questions Joe Forster/STA PC Games - Frequently Asked Questions 0 29-11-2005 09:48



All times are GMT -7. The time now is 21:01.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com