我想在Delphi表单上绘制透明图像,但它不起作用.
这是原始的PNG:

我已经在TImage中加载了图像::
Image1.Transparent := True;
Form1.Color := clWhite;
Form1.TransparentColor := True;
Form1.TransparentColorValue := clWhite;
Run Code Online (Sandbox Code Playgroud)

应用程序:

图像不完全透明.
图像可以通过任何控件或仅通过画布绘制.
我想使用BMP图像.
也许我做错了什么?
请帮忙!
我正在构建看起来像任何操作系统的应用程序,除了它是一个程序.我有它自己的窗户.输出是TImage.
1)应用程序加载形成皮肤文件到TPNGObject:

2)然后应用程序应创建一个新的空白TPNGObject,并将皮肤文件的大小调整为所需的大小,并在该空白图像上绘制它们.应该是这样的:

3)输出TImage:

问题是我确实知道如何创建空白的屏幕外图像.当然我不能简单地绘制皮肤文件TImage,但是更容易调整皮肤文件的大小并创建一次窗口,而不是每次都绘制TImage(也会达到性能).
我正在使用Gustavo Daud的PNG Library,版本1.564(2006年7月31日).
我想创建一个多用户应用程序,但我不知道如何保存和读取加密密码.
procedure SavePass(Password: WideString);
var
Pass: TIniFile;
begin
Pass := TIniFile.Create(ChangeFileExt(Application.ExeName, '.PASS'));
Pass.WriteString('Users', 'USERNAME', Password);
Pass.Free;
Run Code Online (Sandbox Code Playgroud)
密码必须存储在计算机上.这有效,但使用它来保存密码是愚蠢的.散列密码也很好.
如何用颜色填充选定区域?
var Rect: TRect;
Color: TColor;
begin
//fill area with color
end;
Run Code Online (Sandbox Code Playgroud)