OTA:向Image List里添加图片[D5]

使用Image Editor来创建一幅包含一个16X16的图片资源的资源文件。然后将下列代码添加到你的向导代码中：

constructor MyWizard.Create;

var

Services: INTAServices;

Bmp: TBitmap;

ImageIndex: Integer;

begin

inherited;

Supports(BorlandIDEServices, INTAServices, Services);

{ Add an image to the image list. }

Bmp := TBitmap.Create;

Bmp.LoadFromResourceName(HInstance, ''''Bitmap1'''');

ImageIndex := Services.AddMasked(Bmp, Bmp.TransparentColor,

''''Tempest Software.intro wizard image'''');

Bmp.Free;

end;

确定装载时采用的是你在资源文件中确定的名称或者ID。你可以选择图片的背景颜色。如你不你想指定背景颜色，选择一个不可能出现在图片中的颜色。

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有