Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Menü mit Icon

    Delphi
    by teebee, 29. Apr 2004
  Du kannst die Bitmaps noch etwas einfacher in eine ImageList packen.Var
  cc: HINST;
  Begin
  cc := LoadLibrary('comctl32.dll');
  If cc <> 0 Then
  // diese Funktion 'zerschneidet' das breite Bitmap automatisch und erzeugt eine ImageList, inkl. Transparenz
  ImageList1.Handle := ImageList_LoadBitmap(cc,MAKEINTRESOURCE(120),16,0,CLR_DEFAULT);
  FreeLibrary(cc);
  End;
  Jetzt einfach die...