Bilder in die Bildliste einfügen
Nach oben zu Die Hauptobjekte der IDE verwenden
Angenommen, Sie möchten zum Aufrufen Ihres Experten einen Menüeintrag hinzufügen. Außerdem soll der Benutzer der Symbolleiste eine Schaltfläche zu demselben Zweck hinzufügen können. Als Erstes müssen Sie der IDE-Bilderliste ein Bild hinzufügen. Der Bildindex kann dann für die Aktion verwendet werden, die wiederum von dem Menüeintrag sowie der Schaltfläche verwendet wird. Erstellen Sie eine Ressourcendatei, die eine Bitmap-Ressource in der Größe 16 x 16 enthält. Fügen Sie dann folgenden Quelltext in den Konstruktor des Experten ein:
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;
_di_INTAServices services;
BorlandIDEServices->Supports(services);
// Add an image to the image list.
Graphics::TBitmap* bitmap(new Graphics::TBitmap());
bitmap->LoadFromResourceName(reinterpret_cast<unsigned>(HInstance), "Bitmap1");
int image = services->AddMasked(bitmap, bitmap->TransparentColor,
"Tempest Software.intro wizard image");
delete bitmap;
Geben Sie zum Laden der Ressource den Namen oder die ID an, die Sie in der Ressourcendatei definiert haben. Sie müssen eine Hintergrundfarbe für das Bild angeben. Wenn Sie keine benötigen, wählen Sie eine Farbe, die nicht in der Bitmap enthalten ist.
AddImage können Sie High-DPI-Bilder hinzufügen.