Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Free Pascal
»
Beginners
(Moderators:
FPK
,
Tomas Hajny
) »
image in timage compoent won't go to transparent!
Free Pascal
Website
Downloads
Wiki
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Bugtracker
IRC channel
Latest SVN
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
Putting unstructured data...
by
MarkMLl
[
Today
at 08:35:51 pm]
Delphi 7 handling files
by
lucamar
[
Today
at 08:25:22 pm]
CPU simulators
by
MarkMLl
[
Today
at 08:19:27 pm]
TLazSerial : serial port ...
by
Joek
[
Today
at 08:09:58 pm]
Lazarus Release 2.0.12
by
geraldholdsworth
[
Today
at 07:56:13 pm]
Application doesn't start...
by
winni
[
Today
at 07:27:15 pm]
[SOLVED] Stripping inner ...
by
Peter H
[
Today
at 07:24:38 pm]
Tchart distance
by
flori
[
Today
at 07:17:17 pm]
Brook Security (https)
by
RedOctober
[
Today
at 07:05:21 pm]
WinAPI - examples - post ...
by
440bx
[
Today
at 07:04:00 pm]
« previous
next »
Print
Pages: [
1
]
Author
Topic: image in timage compoent won't go to transparent! (Read 1939 times)
Mariner1
Newbie
Posts: 1
image in timage compoent won't go to transparent!
«
on:
July 05, 2017, 05:39:01 am »
Hi All! New to all this. I put a timage on a form, loaded a bitmap, set transparent to true but don't get a transparent background. Can someone set me right on this? Thanks.
Logged
Handoko
Hero Member
Posts: 4046
My goal: build my own game engine using Lazarus
Re: image in timage compoent won't go to transparent!
«
Reply #1 on:
July 05, 2017, 06:46:48 am »
Hello Mariner1,
Welcome to the forum.
Please provide your code and the image for use to check. It could be something wrong with your code or the image.
You can download and try my transparent.zip. I tested on Linux64, it worked correctly opening transparent png file.
Code: Pascal
[Select]
[+]
[-]
unit
Unit1
;
{$mode objfpc}{$H+}
interface
uses
SysUtils
,
Forms
,
Graphics
,
Dialogs
,
ExtCtrls
,
StdCtrls
;
type
{ TForm1 }
TForm1
=
class
(
TForm
)
btnBackground
:
TColorButton
;
btnLoad
:
TButton
;
Image1
:
TImage
;
OpenDialog1
:
TOpenDialog
;
procedure
btnBackgroundColorChanged
(
Sender
:
TObject
)
;
procedure
btnLoadClick
(
Sender
:
TObject
)
;
procedure
FormCreate
(
Sender
:
TObject
)
;
end
;
var
Form1
:
TForm1
;
implementation
{$R *.lfm}
{ TForm1 }
procedure
TForm1
.
btnLoadClick
(
Sender
:
TObject
)
;
begin
if
not
(
OpenDialog1
.
Execute
)
then
Exit
;
try
Image1
.
Picture
.
LoadFromFile
(
OpenDialog1
.
FileName
)
;
except
on E
:
Exception
do
ShowMessage
(
'Cannot open file.'
)
;
end
;
end
;
procedure
TForm1
.
FormCreate
(
Sender
:
TObject
)
;
begin
btnBackgroundColorChanged
(
Self
)
;
end
;
procedure
TForm1
.
btnBackgroundColorChanged
(
Sender
:
TObject
)
;
begin
Form1
.
Color
:
=
btnBackground
.
ButtonColor
;
end
;
end
.
Logged
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Free Pascal
»
Beginners
(Moderators:
FPK
,
Tomas Hajny
) »
image in timage compoent won't go to transparent!
TinyPortal
© 2005-2018